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- PHILIPS NEUE MEDIEN 


FETTE al 
CAR] Pa 


neu Der neue Philips MSX 2. 
Damit man bei der Arbeit 
den Spal3 nicht verliert. 


.„ erneue Philips MSA 2 st ein Computer, der durchaus 
u auch den lusteen Seiten des Lebens gerecht wird, Neben 
‚seinen fzrlichen Pflichten wie Textverarbeitung, Adres- 
FF sen. Datenverarbeitung und dem Bearbeiten von >4- 
istiken, Bilanzen ie. reizt £.B. ein hochentwickeltes Gralikpro- 
erammdazu,auch malden KunslerinlIhnenzuwecken. Undseine 
vielen Spiel- und Lernproeramme sind allemal abendfüllend. 
Aber dieser Philips MSA 2 mit dem eingebauten Diskeften- 
laufwerk ist außenlem Herzstück der Philips Neue Medien 
Systeme, dem Zusammenschluß von Computer und Elementen 
aus den Bereichen der Teekommurikation under Unterhaltungs- 
elektronik. Übrigens - mit Philips MSX 2 verstehen Sie sich, ohne 
erstdas Computern“ erlernen zu müssen: Ste nutzen einfach seine 
za | Funktionen. Mehr darüber von Philips GmbH, Geschäftsbereich 
Sul 1 Beue Medien, Postäach 101430, 3000 Hamburg | 


w Philips paßt 
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Liebe Leser! 


In dieser Ausgabe hatten wir bei der 
Klassifizierung des neuesten STAR- 
GAMES wirklich die Qual der 
Wahl, Dieses Mal mußten sich Re- 
daktion u. Programmabteilung zwi- 
schen 3 Programmen entscheiden — 

Cnttlemania (Artari)/Tank-Simula- Sie sich a also in die i 
tion u. „Die Festung“ (C-64), die| Ser Ausgabe auf 
sich im Grad der Oualität kaum | Uuttlemania u. wei- 
nachstanden. Den Zuschlag erhielt | tere Programme, die 
schließlich Cuttlemania, aufgrund al a Bee 
eines leichten Vorteils in der $piel-| == 
abwechslung bzw. Spielmotivation, | "41= STARGAMIE 

—— verdienen. 


buttLeManım? 





direuen 
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TANK-SIMULATION (C-64) Jack THE DIGGER (Atari) LASER MAZE (Spectrum) 
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Im ersten Teil habt ihr erfahren, 
was ein Programm ist (zumindest 
habt ihr einen ersten Eindruck) 
und ihr habt ein erstes, sehr ein- 
faches Programm kennenge- 
lernt. Dieses Programm war na- 
türlich ziemlich unnütz - deshalb 
werdet ihr in diesem 2, Teil ein 
weiteres Programm kennenler- 
nen, an dem man schon eher se- 
hen kann, daß Programmieren 
eine sinnvolle und arbeitserspa- 
rende Sache sein kann. 


Um dieses Programm verstehen zu kön- 
nen, müssen allerdings einige neue Be- 
grilfe erläutert werden. Zunächst wollen 


wir den Beerill Variable uns näher anse- 
hen. Eine Variable in einem Programm 
hat eine ähnliche Bedeutung wie. in-der 
Mathematik: sie steht stellvertretend für 
irgendeinen konkreten Wert! 

Wenn ein Programmz. B. eine Gleichung 
lösen soll, sagen wir. a+b=c, dann wäre 
es sehr unpraktisch,. für jede spezielle 
Form dieser Gleichung (z.B. wenn a=5 
undb=10 ist) ein besonderes Programm 
schreiben zu müssen. Deshalb existieren 
in jeder Programmiersprache sogenannte 
Variablen, die man sich bildlich als „Be- 
hälter“ oder „Schublade“ vorstellen’kann 
und die dazu dienen, beliebige „Dinge”, 
namlich Symbole wie Zahlen oder Buch- 
staben, aufzubewahren. Um:die einzel- 
nen Schubladen, die man zur Verfügung 
hat, unterscheiden zu können, ist es 
zweckmäßig, ihnen „Namen“ zu geben. 


 eben.5). Neben einem Wert hat jede Va- 
riable natürlich einen Namen, diesen Na- 
men kann sich der Programmierer selbst | 


Hat-man viele verschiedene Dinge, die 


man in Schubladen packen muß, ist es 


außerdem nützlich, bestimmte Schubla- 


‚den nur für bestimmte Dinge zureservie- 


ren. #.B. kann man sagen: alle roten 
Schubladen sind für Zahlen, alle gelben 
Schubladen sind für Wörter vorgesehen. 
Fassen wir das oben Gesagie kurz zusam- 
men: Variablensindeine Art Behälter für 
Gegenstände, die ineinem Programm be- 
arbeitel werden:ım!. Teil haben wir. diese 
Gegenstände Daten genannt. Den jewei- 
liegen Inhalt einer Variablen nennen wir 
den Wert der Variablen (bearbeitet unser 
Programm z.B. Zahlen'und wir legen in 
die Schublade mit dem Namen „ALFA? 
eine „o, dann ist der Wert von ALFA 





aussuchen under tutin der Regelgut dar 


an, sich sinnvolle Namen auszusuchen 
wie ERGEBNIS oder SUMME und nicht 


‚einfach Buchstaben wie A, B oder CE zu 


nehmen. | 

Schließlich ist jede Variable von einem 
bestimmten Typ: damit ist die Art von 
Objekten gemeint, die man in die jeweil- 
ge Schublade legen kann. Was für Typen 
Variablen in TURBO-PASCAL haben 
können, wird später genau erklärt, Hier 
nur ein Beispiel: eine'Varlable vom Typ 
INTEGER kann nur ganze Zahlen:bein- 
halten (3, 30, 3345 etc.}, währendeine Va- 
rablevom Typ CHAR nur sogenannte al- 
phanumerische Werte beinhalten darf, 
namlich Zeichen wie Buchstaben, Ziffern 
ic, 

Eine wesentliche Aufgabe von Program- 
men besteht darin, daß die Werte (eben 





die Daten) verändert werden. $o können 
z.B, Zahlen addiert, subtrahiert oder.divi- 
diert werden, eben alles, was man aus der 
Mathematik kennt, kann im Prinzip 
durchgeführt werden. Eine Folge mäthe- 
matischer Operationen wie z.B. 53+5-} 
kann manin PASCAL prinzipiellgenauso 
schreiben: man hat dann einen Ausdruck 
aufgestellt. Ein Ausdruck ist also eine Zu- 
sammenfassung durchführbarer Öpera- 
tionen, beispielsweise algebraischer OÖpe- 
rationen. Hat das Programm eine solche 
Operation durchgeführt, so muß in: der 
Regel das Ergebnis festgehalten werden: 
wir leeren es am besten ın eine „schubla- 
de" (Variable) und haben es damit für alle 
späteren Verwendungszwecke aulbe- 
wahrt, Diesen Vorgang, einen bestimm- 
ten Wert einer bestimmten Variable zu- 
zuordnen, nennt man Zuweisung; in PAS- 
CAL dient dazu das Symbol :=(nicht zu 
verwechseln mit dem: 'Gleichheitszei- 
chen). Eine Zuweisung kann z.B. so aus- 
sehen 


ERGEBNIS =5 +5: 
Hier wirdiim 1. Schritt. der Ansdruck 5+5 


berechnet (das Ergebnis ist I0), Der Wert 
Uwird im 2, Schritt der Variable mit dem 


| Namen ERGEBNIS zugewiesen, diese 


Variable muß vom Typ INTEGER sein, 
um die ganze Zahl Waulnehmen zu kön- 
Den, 

Leider wirdinänderen Programmierspra- 
chen (z.B. in BASIC) das mathematische 
Gleichheitszeichen = als Zuweisungszei- 
chen benutzt. Das ist völlig irreführend, 
denn in einer Zuweisung wird nichts 
gleichgesetzt, sondern ein Wert in eine 
Variablenschublade gesteckt. Deshalb 
darf man sich auch nicht über erlaubte 
Zuweisungen der Form 


SUMME = SUMME-+ 1; 


wundern, die oft sehr nützlich, im Sinne 
einer mathematischen Gleichung aber 
natürlich völliger Unsinn sind, 

Nach soviel] allgeemeinem Gerede jetztei- 
ne praktische Aufgabe, die wir mit einem 
kleinen Programm lösen werden: Die Be- 
rechnune:des Inhalts einer Kreisfläche. 
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l: PROGRAM Kreisberechnung_1: | 
2: :CONST pi = 3.1413926;; 
3: VAR radius, kreisflaeche.: real; 
4: BEGIN 
3: write (Radius: ’}: ' 
6 readintradius); | 
73 kreislläeche:=radius*radius 
nl; | 
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8: writeln‘ Der Flaecheninhalt 
ist: "‚kreisflaeche); 


9: END, 


Beispielproersamm 
(Version 1) 
Dieses kleine Beispielprogramm macht 
folgendes: Füreinen Radius, der vom Be- 
nuizer eingegeben wird, wird der Flä- 
cheninhalt berechnet und auf dem 
Schirm ausgegeben. Du kannst das Pro- 
eramm zunächst einmal abtippen und 
laufen lassen. (Hinweis: Die Zeilennum- 
mern gehören nicht zum Programm, son- 
dern dienen dem leichteren Verweisen 
auf bestimmte Programmstellen: Die 
Nummern dürfen also nicht eingegeben 
werden, wenn du das Proeramm ab- 
tippst.) 


Kreisberechnung 


Damit duaberauch verstehst, wasda pas- 
siert, soll das Programm jetzt Schritt für | 


schritt-erklärt werden: 
Zeile 1: PROGRAM Kreisberechnung_1; 


Die erste Zeile ist der Programmkopf. Das 
erste Wort „PROGRAM® (nur mit einem 
„m“} ist ein reserviertes Wort. (Reservier- 
te Wörter sind Bestandteil von Turbo- 
Pascal und können nicht vom Benutzer 
neu definiert werden. Reservierte Wörter 
werden von uns immer großeeschrieben. 
Das heißtabernicht, daß du sie aucheroß 
schreiben mußt, wenn du Dein Pascal- 
Programm schreibst.) 

„PROGRAM“ leitet ein Fascal-Pro- 
gramm ein, bedeutet also, daß das Pro- 
gramm hier beginnt. Hinter „PRO- 
GRAM“ muß der Name des Programms 
stehen. Dieser Name (der Fachbegriff 
hierfür lautet: Bezeichner, und zwar ein 
selbsteewählter) darf aus einer beliebigen 
Kombination von Buchstaben, Zahlen 
oder Unterstreichungszeichen bestehen. 
Wichtig ist nur, daß zu Beginn des Na- 
mens keine Ziller stehen darfunddaß die 
Länge des Namens durch.die Zeilenlänge 
(max. 127 Zeichen) begrenzt wird. Nach 
dem Namen muß dann ein Semikolon (5) 
stehen. (Anmerkung: Bei Turbo Pasca! 
muß die Kopfzeile nicht unbedingteinge- 
{ragen werden, d. h., das Programm läuft 
auch ohne, Empfehlenswert ist diese 
„Samenszebung” jedoch aufjeden Fall.) 


Das Semikolon 

Zum Semikolon möchten wireine grund- 

sätzliche Anmerkung machen, weiles für 

ein Pascal-Programm ziemlich bedeut- 

sam ist. Das Semikolon hat die grundle- 

gende Aufgabe zu trennen. Es trennt den 
Proerammkopf' vom übrigen Programmi. 
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Ihr werdet weiter unten sehen, daßesim 
Deklarationsteil einzelne Deklarationen 
trennt. Estrennt auch einzelne Anweisun- 
gen voneinander is, u.) (Für BASIC-Ken- 
ner: das, was ın BASIC die Return-Taste 
oder der Doppelpunkt ist, ist für Pascal 
das Semikolon). Am Anfang werdet ihr 
wahrscheinlich des öfteren das Semiko- 
lorı mal vergessen und ıhr werdet dann 
feststellen, wie verschiedenartig die Feh- 
lermeldungen des Compilers ausfallen 
können, welche Bedeutung also das Se- 
mikolon für ein Pascal-Programm hat. 
Zeile 2 und 3 enthält den sogenannten 
Deklarationsteil. In diesem Teil wird alles 
deklariert (oder anders ausgedrückt: deli- 
niert), was im späteren Hauptprogramm 
(z.B. an Variablen) benötigt wird. 


; Zeile 2: CONST pi = 3.145926; 


Hier wird mit dem reservierten Wort 
„CONST*" eine Konstante mit dem Na- 


men „pi“ definiert. Der Wert von pi soll 
' 3,1415926 sein. (Das Dezimalkomma muß 
als Punkt eingegeben werden.) Die Kon- 


stante „pi” muß im gesamten Programm 
(len gleichen Wert behalten (das sagt ja 
schon der Name)unddarfnicht verändert 
werden. 

Regel: Nach „CONST" kommt der Name 
der Konstanten (ein Bezeichner, s.0.), da- 
nach folet ein „—"-Zeichen und dann der 
Wert der Konstänten. Als Abschluß das 
Semikolon, (CONST Name = Wert;) 
Zeile 3: VAR radius kreisflaeche : real; 
Mit dem reservierten Wort VAR" be- 
einnt die Definition von Variablen. Defi- 
niert werden muß der Typ. den.die Varıa- 
ble haben soll (die Werte selber sind ja 
verschieden, eben variabel), Abgesehen 
davon, daß man in Pascal selbst Datenty- 


pen definieren kann (doch das kommt! 


später), stellt Turbo-Pascal fünf Datenty- 
pen zur Verfügung: 

integer, real, boolean, char und byte. 
Die ersten zwei Typen und der leizte Typ 
sind Zahlen-Typen. Integer bedeutet eine 





I 
\ 


| 


bis 255). (Wir werden alle Datentypen im 
Zusammenhang konkreter Anwendun- 
gen noch genauer besprechen.) 

Der Datentyp für unsere Variablen „ra- 
dius" und „kreisflaeche” ist also: „real”, 
Das erklärt sich so, daß beide Variablen 
auf jeden Fall Zahlen sind, aber der Be- 
reich „integer” nicht ın Frage kommt, 
weil es sonst nicht möglich wäre, einen 
Radius von z.B. 2,50 einzugeben. Das 
Programm würde mit einem Fehler:ab- 
brechen. (Ihr könnt das ja malausprobie- 
ren, Dabei kann nichts passieren.) Ist der 
Datentyp einer Variablen definiert, so ist 
er für das gesamte Programm, indem .die- 
se Variable benutzt wird, festgelegt. Da- 
bei ist folgendes zu beachten: Ist eine Va- 
riable als Real-Typ definiert, so darftrotz- 
dem eine Integer-Zahl (also eine ganze 
Zahl) benutzt werden. Umgekehrt geht 
das jedoch nicht. 

Regel: Nach VAR” kommt der Name der 
Variablen. Haben mehrere Variablen den 
gleichen Datentyp, werden sie durch ein 
komma getrennt. Nach der Variablen 
kommt ein Doppelpunkt und dann der 


Datenivp. (VAR vwariablel,variable},va-' 


rıabie 3 : Datentyp;) 

Die Reihenfolge der Deklarationsteile ist 
übrigens bei Turbo-Pascal (im Gegensätz 
zu Standäard-Pascal) beliebig. Wir halten 
uns jedoch zukünftig immer an die Rei- 
henlolee won Standard-Pascal. Dies 
macht eseinfacher, eventuell malin einer 
anderen Pascal-Version zu programmie- 
TEIL 

In Zeile bis Zeile® befindet sich der An- 


weisungsteil unseres Programms. Hier 


wird die eigentliche Arbeit des Pro- 


 zramms geleistet. In diesem kleinen Pro- 


gramm könntihr übrigens das klassische 
EVA-Prinzip (Eingabe - Verarbeitung - 


| Ausgabe) sehen, das in fast jedem Pro- 


gramm vorkommt. 


| Zeile 4: BEGIN 


ganze Zahl (Bereich -32768 bis +32767), | 
real bedeutet eine reelle Zahl oderanders | 


aussedrückt eine Dezimalzahl (Bereich: 
IE-38 bis 1E+38; diese Schreibweise wird 
euch wahrscheinlich verwundern, aber so 
werden in Pascal Zahlen in Potenz-Form 
geschrieben, Du kennst diese Zahlen bes- 
serin dieser Form: 10-38, bzw. 10+38, also 
eine | mit 38 Nullen einmal nepativ, ein- 
malpositiv). Boolean ist ein sogenannter 
„wahrheitstyp” mit den Werten „trie” 
(für wahr) und „false“ (für falsch). Char 
bedeutet ein alphanumerisches Zeichen 
(also das Alphabet oder Ziffern). Byte ist 
ein Teilbereich von „integer“ (Bereich: 0 


Das reservierte Wort „BEGIN" leitei den 
Anweisunssteil ein. 

Zeile 3: writel’Radius: "); 

Write ist eine Prozedur, die, ganz allee- 
mein gesagt, zur Ausgabe dient. In die- 
sem Fall bewirkt sie, daß der: in Klam- 
mern stehende und in Anführungszei- 
chen stehende Text "Radius: * auf den 
Bildschirm ausgegeben wird. Das, was 
ausgegeben werden soll, muß immer in 
Klammern hinter „write” stehen, 
Zeile'6: readlInlradius); 

Die read-Prozedur ist das Gegenstück zur 
„write”-Peozedur und ermöglicht, ganz 
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Unglaublich, ab 


Modul fur Kassetten- und Disketten-Backups! 


Programm: Freeze Frame MK Il, System: 
C-64/128, Preis: 149 DM, Hersteller, Ver- 
trieb: Personal Computers, software & ac- 


cessories, Bridge Street, Evesham, Worcs. 


WR 4RY, Tel. (0386) 41989 & 49641 


Bei Freeze Frame handelt es sich aus- 


schließlich um ein Kopierprogramm für 


geschützte oder ungeschützte Program- 





Win if Raben uns 1Soleich einen deE härle- 
sten Brocken” ausgesucht, nämlich Inter- 
national Karate. Bei diesem Programm, 
welches auf Kasselte vorlag, hatte „Final 
Cartrige* mit einem Totalabsturz rea- 
giert. Nach einer etwa $ Minuten langen 
Wartezeit wurde das Spiel wie üblich ge- 
startet. Das Modul wird mit dem RESET- 
Taster aktiviert und meldet sich durch ho- 
rizontale Bildschirmstreifen. Durch das 
Betätigen der Tasien „D* für Diskette 
oder „I“ für Tape wird das Programm ab- 
gespeichert. Auf ein aufwendiges Menü 
wurde verzichtet, da dieses Speicherplatz 


benötigt, welcher eventuell durch das ge- | 
ladene Programm belegt wird. In unse- | 


rem: ersten Versuch haben wir die Taste 
„Ü" für Disketie benutzt. Und iatsächlich 


die Diskettenstation lief'an. Nach etwa 3 | 


Minuten Diskettenbetrieb meldet sich 
FREEZE FRAME mit der Frage nach 
dem Proerammnamen. Nach dem wir Ka- 
rate eingegeben hatten, lief’ das Laufwerk 
noch einmal kurz an und beendete die 
Kopie nach wenigen Sekunden. Um die 
Kopie zu testen, zogen wir zuerst das Mo- 
dulaus dem Rechner, denn im Gegensatz 
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zu „Final Cartrige“ können abgespeicher- 
te Programme auch ohne dieses Modul 
geladen und gestartet werden, Nach dem 
wir das Directory untersuchten, stellten 
wir fest, daß Freeze Frame die Program- 
me auf 5 Files verteilt abspeichert. Wir 


starten nun den LOADER mit LOAD 


„KARATE"8.l und wurden überrascht, 
als das Spiel nach etwa 2 Minuten aktı- 
viert wurde. Es lieftatsächlich, auch nach 
längerem Spielen konnte kein Unter- 
schied zum Original festgestellt werden. 


| Wir wiederholten den Vorgang noch ein- 


mal mit Kassette, und auch hier klappte 
es hervorragend, Da Freeze Frame bei 
Kassette sowie bei Diskette ein Schnell- 
ladeverfahren nutzt, läßt sich Karate 
noch schneller einladen als das Original 
selbst, obwohl fast immer über 530 KBytes 
abgespeichert werden. Wir testeten Free- 


ze Frame noch an vielen weiteren Pro- 


erammenundkonnteninkeiner Kopie ei- 
nen Fehler bemerken. Es ist wirklich ver- 
wunderlich, was dieses Modul leistet, wir 
können nur hoffen, daß dieses Modul 
nicht in falsche Hände, sprich Raubkopie- 
rer, gerät. Obwohl die Anleitung in eng- 
lisch geschrieben ist, dürfte es bei der Be- 
dienung keinerlei Probleme geben, da 


sich diese auf drei Tastenbetätigungen 
beschränkt. Um sich eine Sicherheitsko- 


pie anzulegen, oder sein Programmarchiv 
eiwas zu komprimieren (2 0. 3 Program- 
me je Disk), ist dieses Modul mehrals zu 


empfehlen. Trotz zahlreicher Versuche 


konnte kein Versagen festgestellt werden, 


dieses Modul scheint wirklich Kopien zu 
erzeugen, die l00 Prozent compatibel 


zum Original sind, Ich möchte noch ein- 


mal an dieser Stelle darauf hinweisen, 


daß Kopien nur für den eigenen Bedarf 


zulässig sind. 


Fazit: Positiv: Preis-/Leistungs- 
verhältnis gut. Alle getesteten 
Programme konnten kopiert 


werden. Schnelladeverfahren für 


Diskette und Kassette. Übertra- 
eung von Kassette nach Diskette 
und umgekehrt. 

Einfache Bedienung. 

Negativ: - - - 





er wahr! 





Get Dexter: 
“ h & 
oder Crafton u. Aunk 
Programm: Get Dexter, System: Schneider 


CPC, Preis: 40 DM, Hersteller: PSS, Be- 
zug: Profisoft, Sutthauser Str. 50-52, 4500 


\ Osnabrück 


Wırschreiben das Jahr 2912. Aufder Erde 
spielt sich genau das ab, was schon heute 
prophezeit wird: die Menschen beginnen, 
ihre Atombömbchen zu gebrauchen. 
Nun handelt es sich aber nicht nur um ei- 
nen Haufen Verrückter, der gerne seinen 
eigenen Planeten in die Luft sprengt, son- 
dern die Bewohner der Erde haben im 
ganzen Sonnensystem Kolonien gegrün- 
det und fremde Zivilisationen der ganzen 
Galaxis in ihren Planetenverbund einge- 
gliedert. So werden die Entwicklungen 
auf dem blauen Planeten überall mit Sor- 
ge verfolgt, denn dort laufen die Fäden 


zusammen. Der riesige galaktische Com- 


puter, in dem die Daten sämtlichen Le- 
bens gespeichert sind, ist durch den 
Atomkrieg bedroht. Wird er vernichtet, 
bedeutet das das Ende aller Kolonien und 
bekannten Lebewesen, 

Kein Wunder, daß die restlichen Mitelie- 


der des Planetenverbundes beschließen, 


etwas zu unternehmen. Einen Menschen 
zuschicken, schien zu risikoreich und un- 
sicher, Sicherheitssysteme und natürlich 
die kriegerischen Auseinandersetzungen 
verlangen nach einem Spezialisten. Den 
fand man schließlich in einem menschli- 


| chen Roboter, dem Androiden namens 


DEXTER. FODOLEPHALE, ein leben 


ENERGIE 99%, Kol 
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Auf zur Rettung 
des Sonnensystems 





der Fuß mit einem kleinen Kopf, beglei- 
tetihnn aufder Mission und leistetso man- 
che Hilfestellung. 

Das Spiel beeinnt, nachdem das Kaum- 
schiff mitden beiden Helden an einer ge- 
heimen Stelle gelandet ist. DEXTER 
muß nun den Zeniralcompuier finden 
und den speicher kopieren. um den Fort- 
bestand des Lebens ın der Galaxıs zu sı- 
chern. Natürlich hat man auch im 21. 
Jahrhundert schon einiges von Häckern 
gehört und den Speicher miteinem östel- 
lieen Zugriliscode belegt, Dieser muß 
nun von DEXTER herausgefunden wer- 
den, indem er die & Wissenschaftler aus- 
findig macht, die je eine Stelle des Codes 
kennen. Lm die rıchlige Antwort zu er- 
halten, müssen einige Objekie wesam- 
melt und den Geheimnisträgern angebo- 
ten werden. Das Unternehmen wird 
durch hervorragende Sicherheitsanlagen, 
Patrouillen und Wachhunde erheblich 
behindert, Energieverlust, der durch den 
Kontakt mit diesen Sicherungen entsteht, 
muß man an den zufällig auftauchenden 
Aulladequellen ausgleichen. 


GET DEATER ist ein hervorragend 
konzipiertes Actionadventure, das 
Geschick und viel Köpfchen erfor- 
dert, Die Grafik und kleine Gags 





motivieren den Spieler zusätzlich. 
(ta) 


won w Er 
# a 


. | wi 
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BOMB ACK: 


Der Bombenentschärfer vom Dienst 


Proeramm: Bomb Jack, System: U-6d, 
Spectrum 48K, CPC, Preis: 36,- DM, Her- 
steller: Elite Systems, Veririeb: Profisoft, 
Sutthauserstr. 50-52, 4500 Osnabrück 


| 
| 
| 


Umsetzungen von Automatenspielen ge= | 
hören zum täglichen Brot auf dem: S0lt- | 


waremarkti. Trotzdem gibt es immer wie- 
der Jubel und Freude, wenn die großen 
Klassıker aus den Spielhallen ihren Wee 
in den heimischen Computer finden. 5i- 
cherlich sind immer einige Abstriche zu 
machen, Sei es nun beim Schwiengkeits- 
erad, bei der Gralik oder beim Sound, 
doch im allgemeinen bleibt der Spielwitz 





erhalten. Außerdem garantiert das Feh- | 


len jeshicher Münzschlitze am Computer, 
daß jeder neue Anlauf, den Highscore zu 
brechen, bestimmt kostenlos ist: Bei 
BOMB JACK ist das besonders wichtig, 
denn wie viele haben schon .ıhr gesamies 
Geldbeutelchen an den Automaten ver- 
füttert, um vielleicht doch noch einen hö- 
heren Level zu erreichen. 

Die Versionen für die verschiedenen 
Computer weisen natürlich gewisse Un- 
terschiede auf, aufdie wirgleich an dieser 
Stelle eingehen wollen. Getester wurde 
die C-64-Version, und wenn von einer 
ausgezeichneten Grafik die Rede ist, 
kannı man das sicherlich auch auf den 
spekirum und die CPC-Serie beziehen. 
Bei Handlung, Spielablauf und Punkte- 
vereabe ergaben sich ebenfalls keine Un- 
terschiede. Nur beim Sound liegen Ab- 
erunde zwischen dem C-64 und dem Rest 
der (Computer-|Welt. Diese dreistimmı- 
ven mitreißenden Melodien lassen sich 
nurauldiesemComputerrealisieren. Der 
Spektrum-Piepser und der Mini „Laut- 
sprecher* vom CPC bieten auch gar nicht 
die Möglichkeit, hier Gegenwehr zu lei- 
sten. Einzieer Trost lür die Schneider- 
Fans: sollie eine Stereoanlage am CPC 


Spielhallenatmosphäre entstehen. 

Doch nun zum Spiel selber. Der Kame 
saet eigentlich schon alles über die Hand- 
une: der.Spielerlenkidaskleine Energie- 






atismulzern; und 


die den kleinen Helden an seinem Vorha- 
ben hindern wollen. Astronautenäahnli- 
che Zweibeiner, die sich in lliegende 
Monster verwandeln können, ein aggres- 
siver vogel aus der Urzeit und seltsame 
Kugeln, die wie Ulos aussehen, legen die 
Vermutung nahe, dal Außerirdische mil- 
mischen. 

Iavon läßt sıch Bomb Jack allerdings 
nicht irrnilieren, denn auch seine Fähig- 
keiten sind wirklich nicht „menschlich“ 
zu nennen. Er besitzt eine Sprungkrali, 
die sich Jürgen Hingsen bei seinen Stab- 


SI 


nIeRe 
ED 


Eu na ı 





mil ein wenig 


ITatt 
kommen sehr abenteuerliche Aktionen 


zustande, Supersprünge vom unleren 
zum oberen Bildschirmrand und gewagte 
Stops mitten ım Fluz machen es ihm 
möglıch, seinen Haschermn zu entgehen. 
Zusätzlich erscheinen plötzlich Power- 
bälle,; die aus alten Pac Män-Zeiten be- 
kannt sein dürlten. Hat Jack einen sol- 
chen erwischt, kanner die sonstso gelähr- 
lichen Feinde einfangen und zu .Bonus- 
punkten“ verarbeiten. Mit anderen Spe- 


 zıalbällen kann man den Bonus erhöhen 


und eın weiteres „Leben” erhalten. 

Fazit: Einziees Manko bei Bomb 
Jack: die Bomben, die eingesam- 
melt werden müssen, hehen sich 


Hauf einem Schwarz-Weiß-Fernse- 
angeschlossen sein, kann doch nöch | 


bündel Bomb Jack, der an den unmög- | 


lichsten Stellen der Welt Bomben ent- 
schärft. Angelangen von der Sphinx in 
Aryptien bewahrter Großstädte und wert- 
volle alte Schlösser vor gemeinen Bom- 
benanschlägen 


Leider sind am Tatort | 


noch einige seltsame Wesen versammelt, | 


her oder Monochrommonitor nur 
sehr wenig vom Hintergrund ab. 
Bomb Jack sollte also farbtg ge- 


spielt werden. Ansonsten karın das 
Programm bedinzungslos zur un- 
getrübten Bildschirmunterhaltung 
empfohlen werden. Auch ungeubte 
oystickartisten kommen schnell 
zu Erfoleserlebnissen, und Profis 
werden auf den höheren Leveln alle 


Hände voll zu tun haben. (ta) 
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EL 26 100,11777477727 


Dieses Stargame ist auf allen 8-Bit Atari-Computern lauffähig, 
| die über mindestens 48 K RAM verfügen! 
| 


= 
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Unser Stargame dieser Ausgabe wird auch Sie begeistern! 


5o ein fantastisches Strategie- 


spiel ist uns schon lange nicht 


auch nicht bei kommerzieller 


Software!! In der Redaktion wa- 
ren alle restlos begeistert und 





wurden promt auch vom Spiel- 


fieber gepackt. Was ist das Be- 
sondere an CUTTLEMANIA? In 
ersten Linie ist es die tolle Spiel- 
idee, die dieses Programm zu ei- 
nem Spitzenspiel macht. Zwei 
Spieler werden in wirklich pak- 
kende Zweikämpfe verwickelt, 
in denen es nicht darauf an- 
kommt, etwas schneller zu 
schieben als der Geener, son- 
dern man muß strategisch agie- 
ren, um auf dem 3-D-Spielfeld 
Punkte zu erielen. 


Am oberen Bildschirmrand befindet sich 
ein Balken, der zu Spielbeginn zur Hälfte 


rot und blau gefärbt ist. Zwei Kontrahen- | 


ienversuchennunvier Feldereiner Reihe 
durch Springen mit ihrer jeweiligen Fäar- 
be einzufärben, Wenn dies zelinei, ver- 
schiebt:sich das Farbverhältnis in dem 
Balken: zugunsten des jeweiligen Spie- 

lers. Dies geschieht so lange, bis der Bal- 

ken entweder ganz rot oder ganz blau ein- 

gelärbtist;erstdann ist das Spiel beendet. 
Obwohl das Spiel auch so schon außer- 
ordentlich abwechslungsreich ist, kann 
man zusätzlich noch zwischen mehreren 
abwechslungsreichen Spielvarianten 
wählen. MitSKILL erhöht man die Spiel- 
geschwindigkeit, und mit GAME kann 
man einige taktische Parameter des 
Spiels verstellen, GAME listdernormale 
Modus; 2 und 3 verwandeln ein eigenes 
Feld beim zweiten Sprung in ein neuträ- 
les bzw. in ein gegnerisches Feld. GAME 
4-6 entsprechen wiederden Level 1-3: 
jedoch entsteht eine neue Schwierigkeit: 

Über das Spielfeld bewegt sich eine Fall- 

tür, ın die man äußerst schnell hineinstür- 
zen kann, Die eigenen Spielfelder färben 
sich als Folge davon’ wieder neutral und 
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man wird an einer anderen Stelle wieder 
erscheinen. Nicht nur Spielidee und Va- 


ir I i Ind  riationsmöglichkeiten sind fantastisch. 
mehr ın die Hände geraten, LS c 


auch die programmlechnische Limset- 
zung und die grafische Realisierung las- 
sen nichts zu wünschen übrig. | 


Hinweise zum Programm: 





Das eigentliche Maschinensprache-Pro- 
gramm wurde in ein Basicprogramm um- 
gewandelt, dasden Maschinenspracheco- 
de ın DATA-Zeilen enthält. Da das BA- 
SIC-Programm über nicht komplett in 
den Arbeitsspeicher paßt, wurde es in 
mehrere Files aufgeteilt, die nacheinan- 
der gestartet, das ablauffühige Spiel auf 
Diskette (wahlweise auch auf Cassette) | 
schreiben. 

Dazu geht man folgendermaßen vor: 





I. Generierung auf Diskette 





1.1 Die Programme CMANITALBAS bis | 
CMANIAZ.BAS abtippen und ein- 
zein speichern. | 

1.2 Leere, formatierte Diskette bereitle- 
gen. 

1.3 Nacheinander die Programme CMA- 
NIALBASbis....2.BASeinzelnein- 
iaden und starten. 

Die Reihenfolge, in der die Programme 

gestartet werden spielt keine Rolle, da der 

Maschinencode direkt sektorweise auf 

die Diskette geschrieben wird. Die BA- 

SIC-Programme werden nun nicht mehr 

benötigt, sollten aber für Backup-/wecke 

aufbewahrt werden. 

1,4 Jetzt kann das Spielprogramm ge- 
bootet werden: 

ATARI 400 mit 48K / 800: BASIC- 
ROM entfernen, Diskette einlegen 
und den Computer einschalten. 

AXL/XE: Diskette einlegen und beim Ein- 

schalten des Computers die OPTION-Ta- 

ste sedrückt halten, bisdie ersten Ladege- 
räusche zu hören sind, 





2. Generierung auf Kassette 


21 Analog L!] 
2.2 Leerkassette- zur Aufnahme ver- | 
schiedener Zwischencodes rer] 


2:3 


ai cu Eu 


Bud 
u 


2.4 


Leerkassette für das fertige Spielpro- 
erumm bereitlegen. | 
Nacheinanderdie Proeramme CMA- 
NIALBAS bis 
die Frage „Generierung auf Disk 
oder Cassette?” mit "C* antworten 
und nach Aufforderung die Leercas- 
seite für die Zwischencodeseinleren 
und RECORD und PLAY auf dem 
Recorder drücken, anschließend die 
RETURN-Täste betätigen. 


Nun müssen die ? Zwischencodes 
noch zu einem ablauffähigen MC- 
Programm zusammengebunden (ge- 
linkt) werden. Dazu das Proeramm 
LINK.BAS starten. 

Zunächst liest das Programm die 
Zwischencodes wieder ein: Dazu 
muB die Cassette, die die Zwischen- 
codes enthält eingelert und zurück- 
gespult werden. Von nun an brau- 
chen Sie nur noch die Anweisungen 
des Programms zu befolgen. $o 
bald "Leercassette einlegen, RE- 
TURN" auf dm Bildschirm er- 
scheint, die zweite leere Cassette aus 
Pkt. 2.2 einlegen, RECORD und 
PLAY am Recorder drücken und da- 
nach.die Taste RETURN. Nun wird 
das ablauffähige Spiel auf die Cas- 
seite geschrieben, daß 


anschließend gebootet werden kann: 
ATARI 400 mit 48K / 800: BASIC- 
ROM entlernen, Cassette einlegen, 
PLAY am Recorder drücken, Com- 
puler einschalten und währenddes- 
sen. die START-Taste gedrückt hal- 
ten; nach dem Sienalton RETURN 
drücken. 

AL/XE: Cassetteeinlegen, PLAY am 
Recorder drücken, beim Einschalten 
START und OPTION gedrückt hal- 
ten, nach dem Sienalton RETURN 
drücken, 


Nun geht es ans Eintippen. 
Doch werden Sie bald fest- 
stellen, daß Sie für Ihre Be- 


 mühungen „prächtig“ ent- 


lohnt werden! 


, KEULSITENT % Cuttlemania®x Cuttlemania % 
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...BAS starten. Auf 











10 DIM HEIZ ,CIO# 140} „SIOF140) ‚PUFFERF 
(Barrel PurFERFISSFrI ZB =" " 

20 SERAFPHICS 0:SETCOLOR 2,0,0:7." CUTTLE 
HAHTA 1.1 Teil 1 *"ı?7" ic) 1965 by Fra 
nk T. Wittenmayer” 

3) SBEC=1:ESEC=4B 

40 RESTORE FOO:FOR X=1 TO 40: READ A:S5IOr 
(KleCcHRfiäl:zNEXT & 

So FOR X=1 TO 40:READ A:CI0OFek)I=eCcHRFiA): 
NEXT 4 

100 GOSUB 400 

110 7 :7? "Generierung auf Disk oder Cass 
ette 7" 

170 ELOSE #1:10FEN #1,4,0, "Kr: ":6GET Bl,A:c 
LOSE #1:”7 2 

150 IF AmASci"D"} THEN GOSUB S00:END 

140 IF AsASCci"c") THEN GOSUB 400: END 

150. GOTO 120 

400 7? 2? "Einen Moment bitte..."r7 

416 PUFFER=e1:FÜOR ZEILE=1000 TO 1000+(ESE 
EC-5SEC#+1) #4-1 

4720 WERIFY=Ü 

430 FOR %=0 TO S1:READ HEXF:C1=ASC (HER FL 
1,11): C2eAScC cHEX FI Z , 2} } 

440 As1ö#ti61-A8)# (CIE SB) ES 
II HIER FI? 5) + 2-5) ice) 

450 PUFFERF (PUFFER) =CHR#& (A) :PUFFER=FUFFE 
R+l:VERIFY=VERIFY+A:NEXT X 

450 READ A:rIF AcHVERIFY THEN 7 :?7 "IFEHL 
ER IM ZEILE "zZEILE:? "Bitte verbessern 
und Frograma neu":? "starten!":END 

470 7 ""s:NEXT ZEILE:? :RETURN 

Sso0 ? "Destination Diskette einlegen, 57 
ART " 

516 IF PEEKiS3279)<>5 THEN 510 

520 PUFFER=ÄDR (PUFFERFI :FOR SEKTOR=SSSEC 
TO ESEC 

530. ERR=USR(ADRISIO#) „87,5EKTOR,„FUFFER) 
540 IF ERR>127 THEN 7 " www Disk Fehler 
"u "END 

Sa0 PUFFER=PUFFER+128:NEXT SEKTOR 

340 RETURN 

500 7? "Cassette einlegen, RETURN ":DOPEN 
#1,8,128,"Cr2" 

610 ERR=LSRLADRICIOE, 1,11 ,ADR{PUFFER#F], 
(ESEC-SSEC+HI 81 28) 

seo IF ERRF127 THEN #7 * “an Cassetten E/ 
A Fehler """ ":END 

530 CLOSE #1:RETURN 

200 DATA 104,164,1604,141,2,53,104,141,11, 
3,104,141,10,3,104,141,5,5,109,131,4,5,1 
69.1,141,1,3,32,83,228 

910 DATA 173,3,3,133,212,159,0,133,215,7 
=} 

g=0 DATA 104,104,104,24,10,10,10,10,170, 
164,104,157,65,3,104,157,69,5,104,157,68 
‚35,104,157,753,3,104,157 

730 DATA 72,3,32,06,228,132,212,187,0,13 
4,213, 76 

1000 DATA 00,55,06,47,13,49,A7,3C,80,02, 
DZ,18,40,49,13,85,02,85,0C,85,0A,A9,49,8 
= 03,85, OD, gs ‚OB,A#,00, BD, 2547 

1061 DATA 44,02,97, 02,85, 07,4C,DF,5E,FD, 
45,47, AF, 20, A GZHAF; ie 20, 27.20, 00,0 
0,98, 99,38,34,44,44, 44,09, 2665 

10072. DATA 0A,B0,05,097,30,4C,52,47,E9,0%, 
07,40,80,3C,49,58,29,0F,07,094,80,05,097,5 
0,46,655,47,E9,07,07,40,80,2583 

1003 DATA 3D,49,A2,00,49,09,70,42,03,A7, 
2F ,9D,44,03,497,497,90,45,03,A97,10,7D,48,0 
3,49,00,70,47,03,20,55,E4,2760 

1004 DATA 50,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,76 

1005 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00 ,00,00,00,.00,00,.00,00,00,00,00,00,0 
0,00,00,00,01,02,03,00,00,6 


1005 DATA ale ‚00,00,00,00,00,00,00,00, Gi, 





00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,03,03, 03,03,03,03,05, 21. 
1007. DATA 03.03.03,03,03,03,03,03,03,0%, 


00,00,00,00,00,00,00,00,00,00,00,00,55,2 
0,53,E4,AD,03,03,C07,01,F0,1085 

1008 DATA 03,20,35,4A,AD,04,07,18,59,80, 
80,04,.05,AD,05,03,59,00,80,05,03,AD,0A,0 
3,18,69,01,80,04,05,AD,08,183& 

1009 DATA 03,6597,00,8D0,0B8,03,CE,FC,47,AD, 
FC,47,00,09,40,FD,53,47,4F ,20,45,32,92,4 
F,52,20,23,20,00,00,7B,98,3117 

i010 DATA 48,44,4A,34,44,09,04,B0,05,07, 
30,4C,58,49,E7,07,09,40,80,42,4A,58,29,0 
F,C9,0A,B0,05,097,30,4C,6B,2443 

1011 DATA 4A,E7,09,09,90,80,43,44,A2,00, 
AF,09,70,42,03,99,35,70,44,03,A97,4A,9D,4 
5,03,A9,10,90,48,03,99,00,2745 

1012 DATA 70,49,03,20,55,E4,60,20,3F,4B, 
AD,1F,D9,69,07,F0,03,20,7B8,49,60,4C,B2,4 
A,44,69,73,58,62,6F ,6F,74,3224 

1013 DATA 20,57,65,6E,65,72,69,65,72,69, 
5E ,7B,A2,00,99,07,90D,42,03,A97,9E,70,48,0 
3,49 ,44,90,435,03,49,14,90,318& 

1014 DATA 48,03,49,00,70,49,05,20,56,E4, 
A4C,F1,49,44,65,73,74,57,6E,61,74,69,6F ,& 
E,20,65,69 ,4E,6C,659,57,55,>129 

1015 DATA 8E,2C,A0O,CF,D0,D4,C7,CF ,CE,AO, 
98 ,A2,00,497,09,7D0,42,03,47,035,70,44,03,A 
7.,49,70,45,03,A97,1E,70,48,3944 

1015 DATA 03,A9,00,70,49,03,20,55,E4, AD, 
iF,D0,C09,07,D0,F7,AD,1F,D90,C97,053,D9,FF,A 
3,57,80,02,03,A7,05,80,04,3623 

1017 DATA 03,49,49,80,053,03,A7,01,80,0A, 
03,47,00,8D0,08,03,A49,55,80,FC,47,20,FD,4 
7,50,A2,10,99,03,90,92,03,2793 

1018 DATA 49,04,70,43A,03,A7,00,90,48,03, 
40 ,5E&E,48,44,3#A; 46, 4F,4E,54 ‚2E,S3, 454 Se [) 
0,A9,53,970,44, 03 ‚A9,4B,90, 28585 

1517 DATA a5 ‚03,20, 56,E4,C0,00,10,05,20, 
3F „49 ,n2,10,89,07,90,42,03,A9,00,90,44,0 
3,49,70,90,45,03,AP,00,97D0,2510 

1020 DATA 48,03,49,04,90,49,03,20,55,E4, 
A2,10,A9,0C0,70,42,03,20,56,E4,60,AD,2F,0 
2,07,1C,8D,2F ,02,A9,03,80,2516 

ı1021 DATA 10,D00,A9,11,80,5F,02,A97,C2,8D, 
25,02,59,4B,80,27,02,A9,00,80,19,02,A9,0 
1.80,18,02,60,20,07,48,20,2771 

1022 DATA 11,4C,20,9F,4C0,20,54,547,20,88, 
48,A7,01,80,18,02,50,42,03,BC,88,39,B7,4 
7,4F ,70,40,49,89,AB,4F ,9D,31665 

1023 DATA CO,02,B9,7F ,4E,70,78,47,B97,E3, 
4E,70,9C0,49,BC,A4,49,89,57,50,7D,BC,47,B 
7,4F,50,90,84,.49,89,53,50,41597 

1024 DATA 70,B8,497,CA,10,C0,49,00,85,4D, 
50,A2,035,BD,8C,49,90,00,D0,20,70,49,85,B 
2,BD,74,497,85,84,8A,18,60, 3755 

1075 DATA 87,49,95,83,85,65,40,19,99,00, 
71,B4,88,10,FB,BC,90,49,BD,78,47,85,B0,B 
D,9C,499,85,B1,B1,E0,791,B2,4454 

1024 DATA 88,10,F97,BD,70,97,7D0,74,47,CA, 
10,.01,60,42,03,AD,87,49,38,E9,01,95,83,8 
5,05,80,A8,49,90,04,0D0,BD,4142 

1027 DATA AC,4F, 35, B7, BD, Bo, 47.,65,84,A0, 

097,81,84,30,9B, ac, 71, Ba, g8, 10 ‚F6,BC,BC, F 
5,BD,B4,47,85 ‚BO,BD,BE, 39 ‚2494 

LO28 DATA 55,E1,B1,80,11,82,91,B2,88,10, 
F7,BD,AC,49,90,80,49,CA,10,05,60,FC,F3,C 
F,SF,AD,87,47,38,E7,01,85,4500 

1029 DATA B3,85,85,AD,A8,47,8D0,07,D0,18, 
57,04,80,05,D0,18,597,04,80,05,00,18,67,0 
4,80,04 ,0D0,AD,AC,37,85;82,3455 

1030 DATA AD,BO,47,85,B4,A0,1E,A9,00,®1, 
B4,88,10,FB,A0,EC,497,AD,B4,49,65,BO,AD,B 
8,437,85,B1,B1,B0,71,82,88,4542 

1031 DATA 10,F?,AD,AC,47,80,80,47,50,00, 
Ch „ CO, 00 „ 00,00 ,00,00,00,.00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,11497 

10352 DATA 00,00,00,00, 302, 7E,7E,FF,FF,FF, 
FF,FF,FF4FF, FE, FE1BE,EI,FF, FE, FE, 77 ,DS, 1 
E,08,.00,00,00,00,00,00,00,3505 











1033 DATA 00,00,00,00,00,00,00,00,00,00, 
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00,00,00,00,00,00,00,00,00,00,00,3C,7E,7 
E,FF,FF,FF,FF,FF,FF,FF ,7E 2723 

1034 DATA 7E,30,03,7E,7C,7E,03,93,BA,04, 
04,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,1262 

1035 DATA 00,00,00,00,00,00,3C0,7E,TE,FF, 
FF,FF,FF,FF,FF,FF,TE,TE,PF,E7T,FF,TE,TF,D 
D,D7,03,02,40,00,00,00,00,4148 

1054: DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00 ‚oO ‚oo „ad „ic ‚20,00 ‚oc, GH, 
C,FE,TE,FF,FF,FF,FF;FF,FF „1842 

1037 DATA FF ,7E,7E,BC,CS,FF,7E,7F,4D,D9, 
D53,C2,40,00,00,00,009,00,00,00,00,00,00,0 
0,00,009,00,00,00,00,00,00,21&1 

1038 DATA 00,00,00,00,00,00,00,08,08,08, 
00,00,38,76,7C,7C,7C,7C,7C,7C0,38,009,00,0 
0,00,00,00,00,00,00,00,00,1004 

1037 DATA 00,00,00,00,00,00,00,00,00,00, 
ePL se Preis ‚oo ‚20,00,00,00,00 ‚o0,00,00,00,0 
0,00,009,10,10,10,10,10,10,96 

1640 DATA >8,10,00,00,00,00,00,00,00,00, 
00.,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,72 

1041 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,02,072,02,02,02,72,FA,FA,FB,FB,F 
8,F8,F0,C0,00,00,00,00,00,2048 

1042 DATA 29 ,020,00,00,00,00,00,00,00,00, 
00 „00 ,00,,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1043 DATA 40,40,40,40,40,4E,5F,SF,1F,ıF, 
IF,1F,0F,03,00,00,00,00,00,00,00,00,00,0 
0,00,07,38,69,94,94,69,38,1367 

1044 DATA 07,07,38,59,94,94,69,38,07,33, 
55, C0,00,33,56,0D,00,06,36,66,94,95,63,3 
I,FF,FE,2E,5E,8E,BD,5B,29,3040 

1045 DATA F7,F6,26,56,84,85,53,21,EF,EF, 
EF ‚32,64, CA,FC,2E,40,06,F8,24,50,02,F4,2 
6,58, BE,F0,22,54, BA ,EC,1E,4607 

1045 DATA 50,B6,E8,14,32,64,CA,FC,2E,&0, 
C6,FB,2A,5C,C2,F4,26,58,BE,F0,22,54,BA,E 
C,1E,50,B6,E8,1A,40,4D,4D 4161 

1037 DATA 4D,4D,4D,4D,4D,4D,4D,4D,4D,4D, 
40,4D,4D,4E,4E,AD,4E,4E ,4E,AD,4E,4D,AD,A 
D,40,4D,40,40,4C,4C,4D,4D,2468 

1048 DATA 4Nn,4D0,40,40,43C,3C,40,30,40,40, 
4D,4D,4C,4C,4C,4E,4E,40,4D,4E,4E,40,4D,4 
E,4E,4D,4D,4E ,4E,4D,4D,4E ,2468 

1047 DATA 4E,4D,40,4E,4E,4D,4D,4E,4E,4E, 
40,40, 4E,4E,4D,4D,4E,4E,4D,AD,4E,4E,4D,4 
D,4E,4E,4D,4D,4E,4E,40,40,2480 

1050 DATA 4E,18,18,18,18,18,18,18,18,18, 
19,18,18,18,18,18,18,18,19,10,18,18,18,1 
8,18,18,18,18,18,18,18,18,822 

1051 DATA 18,18,18,18,18,18,18,18,18,18, 
18,18,18,18,18,18,18,18,18,18,18,18, 18,1 
8,18,18,18,18,18,18,18,18,768 

1052 DATA 18,18,18,18,18,18,18,18,18,18, 
18,18,189,18,19,19,18,18,18,18,18,18,18,1 
2,18,18,18,18,18,18,18,18,748 

1053 DATA 18,18,18,18,18,0E,0E,0E,0E,0E, 
OE „OE,OE,OE,OE,OE,OE,OE,OE,OE,0E,48,.48,4 
8,48,9A,9A,7A,9A,0E,0E,0E,1290 

1054 DATA OE,OE,OE,OE,OE,OE,0E,0E,0E,0E, 
GE,OE,OE,OE,OE,0E,OE,OE ‚0E,OE,OE,OE,0E,4 
3,48,48,48,48,42,48,48,49,770 

1055 DATA 48,48,49,48,48,48,48,48,48,48, 
48,48,48,48,48,48,94,9A,94, 9A, 74,94, 90,9 
A, FA, FA, 9A, A, TA TA, TA, A, The 

1056 DATA FA, FA,97A,9A,9A, FA, 9A, FA,A,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,04,04,04,04,08,08,08,142& 

1057 DATA 08,10,10,10,10,20,20,20,20,0£, 
ÖE,OE,OE,1C,10,10,1C,38,38,38,38,70,70,7 
0,70,1F,1F,iF,1F,3E,3E,3E,1350 

1058 DATA 3E,7C,7C,7C,7C,FB,FB,F8,FB,0F, 
IF,ZF, SF, 0,30,30,50,0F,0F, OF. OF, D0,00,0 
0,00 ,00,00 ,00 ,00,00,,00,00,?0B& 

1057 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
ie) „oo ‚oo :00,00,00,00,00,00, # 


1060 DATA 00,00,00,00,00,00,00,00,00,00, 
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00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1051 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1052 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1055 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1054 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1065 DATA 60,00,00,00,00,00,00,00,00,00, 
09,09,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1057 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1058 DATA 60,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00 ‚29,00 ‚o0,00, On, o0,0 
1059 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,09,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1070 DATA 00,00,00,00,00,00,00,00,00,00, 
oo ‚0,00, OO OO, O0, OO ‚00,00,00,00 ‚00,00,0 
0,00,00,00,00,00,00,00,00,0 
1671 DATA 00,00,00,00,00,00,00,00,00,00, 
29,00,00,00,00,00,00,00,00,00,00,00,00,0 
I, oc ‚O0 ‚oo ‚oc ‚00,00,00,00,0 
1072. DATA 00.00 ,09 ,00.,00,00,00,00,00,00, 
009,020,00,00,90,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1073 DATA 99,00,00,00,00,00,00,00,00,00, 
©9,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1074 DATA 00,00,00,00,00,00,00,00,00,00, 
oO,00, 00,00, O0, alu O0, Do, al 00, OO ‚00,00,0 
9,00,00,00,00,00,00,00,00,0 
1075. DATA 00 ,00,00,00,00,00,00,00,00,00, 
02,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
107& DATA 00 ,00,00,00,00,00,00,00,00,00, 
0 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00 09,.00,00,00,00, 00,00,0 
1077 DATA 90,00,00,00,00,00,00,00,00,00, 
20,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1078 DATA 00,00,00,00,00,00,00,00,00,00, 
90,00,00,00,00,00,00,00,00,00,00,00,00,0 
9,00,00,00,020,00,00,00,00,0 
1077. DATA 00,00,00,00,00,00,00,00,00,00, 
00.00.00.00.00.00.00.00,.00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1086 "DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1081 DATA 00,00,00,00,00,00,00,00,00,00, 
O0,00,00,00, als ‚00,00,00,00,00,00,00,00 „o 
0,00,00,00,09,00,00,00,00,0 
Luz DATA 00,00,00,00,00,00,00,00,00,00, 
09,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1083 DATA 00,00,00,00,00,00,00,00,00,00, 
00.,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1084 DATA 00,00,00,00,00,600,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1085 DATA 00 ,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,.00,0 
0,00,00,00,00,00,00,00,00,0 
1085 DATA 00,00,00,00,00,00,00,00,00,00, 
209 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
1087. DATA 00,00,00,00,00,00,00,00,00,00, 


‚00,00,,00,00,00,00,00,00,00,00,00,,00,00,0 





nn Egg une 


* 9,00,00,70,70,F0,47,25,58,660 
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1058 DATA 70,46,23,534,70,70,70,70,44,75, 
59,.04,04,04,04,04,04,04,04,04,04,04,70,7 
0,F0,56,55,59,41,00,54,00,1942 

1087 DATA 35,2B,29,2C,2C,1A,00,00,00,00, 
00.,00,27,21,20,25,1A,00,00,20,AD,55,20,7 
D,5B,20,F3,54,20,355,55,20,1561 

(or DATA 7,57, 20,E4,54,99,00,80,CB,02, 
A7,34,80,04,02,99,85,80,05,02,A7,08,8D,C 
5,02,A7,FC,80,C7,02,99,,00,5825 

1091 DATA 80,30,02,47,54,90,31,02,AF, 70, 
5D,F4,07,A9,00,80,48,47,80,49,49,80,AA,4 
7,90,4B,49,80,AC,49,BD,AD,3707 

(072 DATA 47,RD,AE,47,80,AF,47,20,0D,5B, 
AD,1F,00,C9,03,D0,18,EE,DD,49,AD,DD,47,C 
2,06,90,05,69,00,80,00,47,4001 

1073 DATA 18,657, 11,80,37,54,20,EB,54,AD, 
ıF,DO,C9 ,05,00,18,EE,F5,47,AD,F5,49,69,0 
7,70 ,05,49,00,80,F5,47,18,3595 

1074 DATA #9,11,80,20,54,20,EB,54,AD,F5, 
49,18,69,11,80,20,54,AD,DD,47,18,67,11,B 
D,37,54,AD,1F,D0,C9,05,00,3368 

109% DATA AF,20,08,55,650,AD,1F,09,C7,07, 
DO,FF ,60,99,00,20,00,47,A9,01,80,C01,47,A 
2.07,80,06,49,49,03,80,C3, 3811 

1075 DATA 47,540,99,00,80,00,49,47,01,8D, 
C1,49,49,02,80,02,49,A9,03,80,03,49,50,2 
0,30,55,20,35,39,20,AD,55,3203 

1097 DATA 20,01,55,20,90,58,20,00,58,£0, 
49,05 ,.80,DE,47,60,A2,0F,A9,03,70,DF,49,C 
A,10,FA,A9,01,80,C0,47,890,3736 

{078 DATA D1,49,80,0F,49,80,03,49,8D,D5, 
49,80,04,49,49,02,80,CE,49,80,02,47,8D,D 
0,47,80,D04,49,A9,00,BD,FA,4406 

1099 DATA 49,80,FB,49,80,F8,49,80,A4,47, 
A9,00,80,DB,47,A7,00,80,DC,49,40,7F,55,7 
E,55,AD,7E.55,48,A0,70,559,3921 

1100 DATA 48,20,45,50,AD,DB,47,18,59,01, 
80 ,DB,497,AD,DC,49,69,00,8D0,DC,49,AD,DC,4 
7,C07,00,00,05,AD,DB,47,69,3740 

1101 DATA 02,F0,01,60,63,48,60,A9,20,80, 
07,04,18,59,04,8D,87,47,20,9B,48,A7,95,8 
D,0C,00,50,47,00,80,30,02,3019 

1102 DATA A9,59,80,31,02,49,34,8D0,C4,02, 
A497 ,84,80,05,02,49,08,80,08,02,A9,FC,80,C 
7 ,02,07,70 ,B8D,F4,02,50,00,3897 

1103 DATA 00,00,00,00,00,00, oc „Oo a ale) ‚So # 
00,00 ,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1104 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1105 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00.,00,00,00,00,00,00,0 

11066 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1107 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

{108 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0.,00,00,00,00,00,00,00,00,0 

1107 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

{110 DATA 00,00,00,00,00,00,00,00,00,00, 
06,00,00,00,00,00,00,00,00,.00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1111 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00 ,00,00 „00,00 ,00,00,00,.00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1112 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

111% DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
O ‚20,00 ‚20,00,09,00 ‚oo ‚o0,0 

1114 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
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0,00,00,00,00,00,00,00,00,0 

1115 DATA 00,00,00,00,00,00,00,00,00,00, 
00,,00,,00,00,00,00,00,00,00,00,00,00,00,0 
0.,00,00,00,00,00,00,00,00,0 

1116 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00 ,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1117 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1119 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,70,70,F0,47,25,58,660 

1120 DATA 06,46,4D,58,08,70,70,70,44,75, 
58 ,04,04,04,04,04,04,04,04,04,04,04,70,7 
0,F0,55,55,54,41,00,598,00,1778 

1121 DATA 00,00,00,A3,87,93,83,84,85, AD, 
B5,87,88,86,B1,00,00,00,00,00,00,00,00,0 
0,84,80, 84,04, BA, 82n,8A,89,2772 

00 „00 ,,0B,0B,0B,O0B,OB,0B,0B,0B,0B,0B,00,0 
0,00,00,00,00,00,00,00,00,38& 

1123 DATA 8C,8C,80,80,8C0,8C,8C,8C,8C,6C, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,73,6F,1626 

1174 DATA AF,5ör s6F,7FsbFs6F,6FsöF,7Fsöf, 
6F „öF,6F,7F,6F,6F,6F,6F ,6C0,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,2154 

1125 DATA 00,00,00,00,00,73,4F4&F,&F,6F, 
TF,5F 8 5F BGF S6F57F3öFs&rsbF,&F.7F86F 646 
F.6F ,66,00,00,00,00,00,00,2380 

1126 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,53,4F „AF Ar Ar 853, 4F AP 24F ‚dr 855,4 
F,AF,AFsar SI Ar sAF Ar ar, 1596 

1127 DATA 3C6,00,00,00,00,00,00,00,00,00, 
00 ,00,,00,00,00,00,00,00,00,73,6F,6F ,5F,& 
EFF öF SF br, GP, 7F,6F,6F, 1555 

1128 DATA SF ,öF,7F,5r,öf,6F,6F,60,00,00, 
00,00 ,,00 ,00,,00,00,00,00,00,00,00,00,00,0 
0,00,00,73,6F ,6F ‚6F ,6F ,7F,1587 

1129 DATA &F,&r,öf,6f sr sörs6r5öf,6Fs Tr, 
öF „6F ,6F „öF „5C6,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,1894 


1130. DATA 00,53, 4F ,AFs4FsAFs53, 4F sAFrsArs 


AF SS ,AF Ar „ar „ar ,53,AF Ar ,AF,AF,4C,00,0 
0,00 ,06,00,00,00,00,00,00,18572 
1131 DATA 00,00,00,00,00,00,00,00,75,4F, 
&F Ar br 3TF,öF,&Fsör „of, Tr ,öfsarsörsör, 7 
F,&F,&F ,&F,6F,66,00,00,00,2380 
1132 DATA 00,00,00,00,00,00,00,00,00,00, 
00.00,00,00,00,73,4F „HF,&F,&6Fı7FöF,6F,& 
F,&ör,FF,öF,6r,öf,öF,7F,5F,1937 
1133 DATA &F,6F,6F,56,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,53,4 
F Ar „Ar,Ar 53,4F ,Ar,ar ,AF,1239 
{134 DATA 53,AF,4F ar „ar „53,4F ‚Ar ,AF,äf, 
4C,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,73,&F ,4F,1211 


1135 DATA AFr,&rsTFsörsör, af, ör Fr arr, 


öf,sF,TF,6F,6Ff,öf,öFf,50,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,2043 

1154 DATA 00,00,00,00,73,6F ,5F ,öf ,öF, FF, 
sF,5F,&F,5F,7F,BF,6&F,&r,&r,T7Fs&r,6F,ör,6 
F,5C,00,00,00,00,00,00,00,2380 

1137 DATA 00,00,00,00,00,00,00,00,00,00, 
00,53, 4F „AF „Ar Ar „53 ,äF sär sArsAF 53, F9 
F5AF ar 53,4F „Ar „ar ar ,sC, 1672 

1138 DATA 00,00,00,00,00,00,00,00,00,00, 
00 „00 ,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1137 DATA 00,00,00,00,00,00,00,00,A3,89, 
B3,85,04,05,AD,858,87,88,85,81,890,80,5D,8 
0,80,AF,A8,80,B4,AB,AlL,B4,5481 

1140 DATA 80,A3,B5,84,B4,AC,45,B3,00,80, 
AS,AB,AL,BO,B4,AS,B2,80,B4,8B7,AF,80,80,8 
D, Bü, BO,„BF,B0 „Fi ‚77 ,78,75,0033 

1141 DATA 80,A2,6F,80,A5,B2,Al,AE,AB,BO, 
B4,8E,50,B7,A97,B4,84,A5,AE,AD,A1,B7,45,B 
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2,80, ‚80 ‚80,80, a0, B0, B5, a2, Siis 

{142 DATA AC,ATF, B3 „Au, AS,Ha, 80,92,B7,B0, 
A3,AF AD, BO, B5,B4,BZ,AF ‚AE,A9.A3,80,80,8 
D,80,80,85,45,E2,B9,80,B3,5197 

1145 DATA 89,95,A5,497,A1,AC,80,47,B2,#5, 
A5,B4,A9,AE,A7,B3,80,B4,AF,80,A1,AC,AC,B 
0,84,48,A1,54,80,A5,A3,AB,5238 

1144 DATA AS,B2,B3,74,80,A1,A3,AB,AF,AC, 
A9,80,AB,AF,AC,A7,90,AB,AS,B2,B3,.B4,A9,A 
E,80,B0,A5,B4,B2,A1,80,B3,5255 

1145 DATA BF,AC,B4,80,B4,A8,AF ,AD,Al,BS, 
Bo ,Al,AE,A4,80,84,A97,AE,A5,80,00,80,80,8 
0,A1,AC,BS,AF,80,41,B5,A1,5118 

1146 DATA AF,AC,AI ,AZ,AC,AS,SA,00,97,B2, 
AF,AF,56,A5,80,80,80,A3,A5,B2,A5,B3,90,8 
D,80,45,B2,A1 ,AE,B4.A9,A3,5180 

1147 DATA 91,80,80,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,395 

1148.DATA 06,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,A 
7,AD,80,00,02,49,5B,8D,01 ,887 

1147 DATA 02,A7,C0,8D0,0E,04,50,48,8A,48, 
AZ,OF ,AD,EF,49,29,F0,092;0A,80,04,D4,80,1 
8,00,18,59,10,CA,10,F4,AD, 3596 

1150 DATA C&,02,80,18,D0,EE,EF,49,AD,C7, 
02,18,59,02,27,0F ,80,07,02,&0,AA,658,40,A 
9,00,80,08,D02,A9,03,8D0,0F , 3324 

1151 DATA D2,60,20,50,50,20,997,50,20,35, 
>D,&0,AE,DB,47,BD,D5,49,00,55,BD,78,02,9 
D,D7,49,09,,OF,FO,61,A8,BD,40721 

1152 DATA CD,47,18,79,85,5C0,C09,04,50,44, 
7D,CD,47,BD,CF,49,18,79,75,5C,C07,04,B0,3 
6,70,CF,49,89,49,01,A89,B9, 3924 

1153 DATA CD,47,00,C0,47,00,08,B7,CF,37, 
DD,CF,49,FO,1F,AP,0F,9D,D5,49,60,07,49,9 
D,D97,47,E0,01,F0,08,99,04,4427 

1154 DATA 80,C4,49,4C,55,5C,49,05,80,C5, 
49 ,49C,65,5C,60,D1,49,90,CD,497,80,03,49,9 
D,CF,49,AF,0F,70,D7,49,AE,4152 

1155 DATA DB,49,80,05,49,F0,17,DE,D5,49, 
BD,DS,437,00,0F,BD,CD,49,7D0,D1,47,BD,CF,4 
7,70,0D3,47,20,A5,5C,50,00,4437 

1156 DATA 00,00,00,00,01,00,01,00,00,FF, 
FF),O00,00,00,00,00,00,00,00,00,00,FF,00,0 
0,01,00,00,00,01,FF,00,AD,1197 

1157 DATA DD,49,D0,04,20,02,50,60,C9,01, 
D0,04,20,E8,5C,60,09,02,00,04,20,0F,5D,5 
0,07,03,00,04,20,02,50,50,3299 

1159 DATA C9,04,00,04,20,E8,50,60,20,0F, 
SD,S0,AE,DB,49,BD,CF,49,18,0A4,04,7D0,CD,4 
7,99,BD,E5,5C,99,DF,49,50,3711 

1157 DATA 01,02,AE,DB,497,BD,CF,49, 18,04, 
OA,7D,CD,47,A8,B7,DF,49,0D,06,50,F0,07,B 
D,08B,5D,99,DF,49,50,BD,0D,364& 

1150 DATA 50,7%7,DF,49,60,01,02,03,07,AE, 
DB,47,BD,CF,47,18,09,0A,70,C0,497,38,89,D 
F,497,DD,32,5D0,F0,07,BD,32,3578 

1161 DATA SD, 9, ‚DF,49,50,BD,34,50,97,DF, 

49,60,01,02 „02, 01,AD,FA,49,00,058,20,53, 5 
D,4C,44,5D, 20, B7, &1,AD, FB,3414 

1162 DATA 49 ,D0,06,20,B0,5D,4C,52,50.,20, 
DE,51,50,AD,D3,497,18,09,0A,60,D1,49,AA,B 
D,0D,5E,48,AD,D9,47,18,0A,3213 

i153_DATA 09,0A,0A,50,05,49,04,659,18,7D, 
20,5E,80,8C0,47,80,BE,49,AD,D3,49,18,0A,0 
A,60,D1,47,AA,ED,1D,5E,48,3143 

11654 DATA AD,D?,49,18,0A,0A,09,0A,5D,D5, 


47 ,AA,58,18,7D0,20,5F,80,70,49,80,92,49,A. 


E,D?,49,BD,2D,60,80,88,49,3347 
1165 DATA AE,DS,49,BD,4D,60,8D,BA,49,60, 
AD,D4,49,18,0A,0A,5D,D2,47,AA,BD,OD,SE,4 
8,AD,DA,47,18,0A,04,09,04,3230 
11&& DATA &0,D6,49,AA,68,18,7D0,2D,5E,BD, 
80,49,5D,8F,49,AD,D4,49,18,0N,09,5D,02,4 
2,AA,BD,1D,5E,48,AD,DA,49 3582 
1167 DATA 18,0A,0N,0A,04,4D0,04,49,AA,68, 
18,7D0,2D,5F,80,71,47,80,73,47,AE,DA,49,B 
D,30,50,80,89,49,AE,D6,49,3366 
1168 DATA BD,5D,30 ‚SD,9B,49, 60,5F,83,97, 
AB,63,77,88,9F,57,6B 176,93, 4B, SF ‚73, 87,5 
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8.58.58.58.70.70,70, 70, ‚a8, ‚3731 

1157 DATA 88,88,88,A0,AU, AU, AU,UU,00,00, 

00,00,00,00,00,00,00,00,00,00, 00,00,00,0 

0,00, 00,00, 0000,00 ‚00,00,1048 

1170 DATA 00,,00,00 ,00,,00,00,00,00,00,00, 

00,00 ,00,00,00,00,00,00,00,00,00,00,00,0 

0,00,00,00,00,00,00,00,00,0 

1171 DATA 09,00,00,00,00,00,00,00,00,00, 

00,00,00,00,00,00,00,00,00,00,00,00,00,0 

0,12,11,0F,0E,0D,0C,0B,0A,110 

1172 DATA 09,08,07,06,05,03,01,00,0C,0B, 

04,097,08,07,07,06,05,05,04,03,02,01,00,0 

0,12,11,0F,0E,00,0C,0B,09,239 

1173 DATA 09,08,07,05,05,03,01,00,00,00, 

00,00,00,00,00,00,00,00,00,00,00,00,00,0 

0,F4,F5,F4,F7,FO,F9,F9,FA,2017 

1174 DATA FB,FB,FC,FD,FE,FF,00,00,EE,EF, 

F1,F2,F3,F4,F5,Fa,F7,FB,F®,FA,FB,FO,FF,O 

O,EE,EF,F1,F2,F3,F4,FS,F6,7145 

1175 DATA F7, FB, F9, FA,FB,FD ‚FF,00,00,00, 

00,00,00,00,00,00,00, 00 ,00,00 „00,00,00,0 

0, et FS,F6,F7 ‚Fa8,F9,F9,FA,3731 

1176 DATA FB,FB,FC,FD,FE,FF.00,00,00,08, 

0A,09,08,07,07,06,05,05,04,03,02,01,00,0 

0,00,00,00,00,00,00,00,00,1606 

1177 DATA 00,00,00,00,00,00, 00,00,00,00, 

00,00,00,00,00,00,00, 00, 00,00,00,00, 00,0 
0,00, ‚00,00,00,00,00,00 ‚00,0 

1178 DATA 00,00. „00 ,00,,00,00 ‚00,00,00,00, 

00,,00,,00,00,00,00,00,00,,00,,00,,00 ,00 ,00.0 

0,00,00,00,00,00,00,00,00,0 

1177 DATA 00, 00,00,00 ‚00,00, 00,00,00,00, 

00,00,00,00,00,00,00,00,00,00,00,00,00.0 

O,FO,F2,EE,EB,E9 ‚E7 ,E6,E7, 1088 

I1B0 DATA E9,,EB,EE,F2,FB ‚00,,00,00 ‚E2,DF, 

DC,DA,D9,D9,D8,Da, D7,DA,DD,E2,E9,F2,00,0 

0,F8,F2,EE,EB,E9,E7,E6, E7 6194 

1181 DATA E3, EB,EE,F2, Fa, 00,00 ,00,00,00, 

00,00,,00,00,00,00,00,00,00 ,00,00,00,00,0 

0,0C,03,FC,F5,F2,F1,F0,F0,2671 

1182 DATA F1,F1,F2,F4,F&,FC,00,00,Fa,F2, 

EE,EB,E#,E7,E6,E7,E# ,EB,EE,F2,F8,00,00,0 

0,F8,F2,EE,EB,E9,ET,E6,E7,6438 

1183 DATA E9 ,ER,EE,F2,F8,00,00,00,00,00, 

00,00 ,00,00,00,00,00,00,00,00,00,00,00,0 

0,06,03,FC,FS,F2,F1,FO,FO,2671 

1184 DATA Fi, Fi,F2 ‚FA.Fh, FC,00,00 ‚E2,DF, 

DC,DA,D9,D? ‚D8,D8, DF,DA,DD,E2,E9,F2,00,0 

0,00,00,00,00,00,00,00,00 „1576 | 

1185 DATA 00,00,00.00 ‚00,00, 00,12,12,12, 

12,12,11,13,11,12,12,10,10,12,12,12.12,1 

6,16,16,156,16,15,17,15, 16,481 

1184 DATA 16,14,14,16,16,17,16,0F,0E,0D, 

OL ,0B,0A,07,08,07,08 „05,04,03, 02,01,00,0 

F ‚ÖE,OD, OC ,0B,09,09,08,07 ‚370 

1187 DATa 06,05,04, 83 ‚02,01 ,00,AD,FA,49, 

D0,13,AD,F8,49,09,02,00,03,20,65,50,49,0 

0,80,0B,49,20,F2,5B,60,09 ,3241 

1188 DATA 01,00,04,20,FB,50,60,C09,02,D0, 

04 ,20,4F ,51,50,20, 73,61, 50,AD,FB, 39,D0,1 

3, AD, FE,4F,09 „02, 00,03, 20, za 

1189 DATA E0,40,A9, 01 ,8D0,0B,49 ‚20,F2,5B, 

&0,C9,01,00,04,20, 25,61,40,09 ‚02,00, 04,2 

0,61,61,560,20,95,61,60,AD,3344 

1190 DATA D5,49,D0,15,AD,D1,49,CD,F&,49, 

B9: 0D,AD,D3,47,00,F7,49,00,05,49,01 ‚BD, F 
A,49,60, AD ‚Ds ‚49,00, 15, AD,4502 

1191 DATA D2,49,CD,F6,49,D0,0D,AD,D4.49, 

CD,F7,47,D0,05,A47,01,80,FB,49,50,AD,8A,4 

7,C7,14,80,10,A?,18,80,8A,42724 


Weiter geht's auf der nächsten 
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10 DIM HEXF12) ,CIDO#(40) ,SIO# (40) „PUFFER# 
(&4=17281 : PUFFERF (a4# 1 28)=" " 

20. GRAFHICS 0:5ETCOLOR 2,0,0:?7 " EUTTLE 
HANIA I.I Teil 2 ":?7" dc) 19785 by Fra 
nk T. Wittenmayer" 

30 SSEC=49: ESEC=B4 

40 RESTORE Foo: FÜR X=1 TO 40:READ A:SIOH 
{X)=eCHRFIAITNEXKT X 

s0 FÜR KX=1 TO 40:READ A:CIOFiX)=CHREIAI: 
NEXT X 

106 GOSUB 400 

110 ? +? "Generierung auf Disek oder Cass 
ette 7" 

120 CLOSE #1:0PEN #1,4,0,"K:":6GET #1,A:C 
LOSE 41:7 

130 IF As=ASct"D") THEN GOSUB 500: END 

146 IF A=ASCt"C") THEN GOSUB A00:END 

150 G0TO 120 

400 7 7? "Einen Moment bitte...":r? 

410 PUFFER=eL:FOR ZEILE=1000 TO 1OO0+ LESE 
C-5SSEC+ 1 )#4=-1 

420 VERIFY=6 

450 FOR X=0 TO F1:READ HEXF:C1=ASCCHERF 
1,13) 2 CReASctHEFFi2,21 1 

440 Aelbsattbi-4B8r8lcikär+rilet- reed 
II +iCc2-481# 672581 +2 - 5) C2HH) 

450 PUFFER# (FUFFERI=SCHR#$ (A}: FUFFER=FUFFE 
r+l:VERIFY=VERIFY+A:NEXT X 

446 READ A: IF Ac>VERIFY THEN ? 27 "PFEHL 
ER IM ZEILE "+ZEILE:? "Bitte verbessern 
und Programm neu":? "starten!":END 

470 7 "H3sNEXT ZEILE:T :RETURN 

500 ? "Destination Diskette einlegen, 57 
ART " 

510 IF FEEKISSE7F)<HG THEN 510 

520 PUFFER=ADRIPUFFERFI:FOR SEKTOR=-SSEC 
TO ESEC 

530 ERR=USRCADRISIO# „87 ,SEKTOR,FUFFERI 
540 IF ERR>127 THEN 7 " www Disk. Fehler 
“u ":END 

550 PUFFER=PUFFER+12B:NEXT SEKTOR 

>60 RETURN 

500 7 "Cassette einlegen, RETURN ":OPEN 
“1,8,128,"C:" 

510 ERR=USRCADRICEIDOFI,1,11,ADRIiFUFFERF), 
tESEC-SSEC+H1) #128) 

520 IF ERR>1?7 THEN 7 *" was Cassetten E/ 
A Fehler “sr "ıEND 

530 ELOSE #1:RETURN 

700. DATA 104,104,104,141,2,3,104 141,11, 
3,104,141,10,3,104,141,5,53, 104,191 ,4,3,1 
49,1,141,1,3,52,83,228 

710 DATA: 173,5,3,133,212,159,0,133, 213,7 
& 

720 DATA 164,104,104,24,10,10,10,10,170, 
104,104,157,655,3,104,157,59,3,104,157,88 
‚>,104,157,73,5,104,157 

759 DATA 72,3,32,05,228,132,212,1597,0,13 
3,213,7& 

LO0O DATA 47,A9,32,80,88,497,49,09,80,C4, 
49,50,EE,BA,47,EE,88,47,AD,8A,47,09,50,9 





t001 DATA BB,49,09,14,B0,10,A9,18,80,88,. 


47,59 ,4B,80,89,49,A9,094,90,05,47,60,EE,8 
B,47,EE,89,49,AD,8B,49,09,3936 

100? DATA 30,70,05,49,072,80,FB,49,60,A0, 
öF,B?,DF,49,07,01,00,05,49,03,99,DF,49,B 
8,10,F1,50,A0,0F „B9,DF.49,3766 

1003 DATA C9,02,00,05,49,03,77,DF,49,88, 
10,F1,50,CE 88,49, CE ‚84,49 ,AD,84,49,09,1 
7,80,14,49,00,80,89,49,49,3854 

1004 DATA 11,80,88,49,A9,00,30,FA,49,49, 
03,80,F8,47,60,CE,99,47,CE,8E,47,AD,8B,4 
7,09,17,B0,14,49,00,80,88,3820 

1005 DATA 49,49, 15,80,89,49,A7,00,BD,FB, 
49,09,03,80,FB,49,50,AD,D3,49,18,0A,0A,6 
D,D1,49,AA,BD,0D,5E,80,80,3617 
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10054 DATA 47,80,8E,47,AD,.D3,47,18,0A,0A, 
sD,D1,49,AA,BD,1D0,5E,80,70,49,80,72,47,6 
0,AD,D4,47,18,0A,0A,20,D2,3458 
1007 DATA 49, AA,BD,OD,SE,8D,80,47,8D,BF, 
497,AD,D4,49,18,04,0A,50,D0D2,47,AA,BD,i1D,S 
E,80,71,47,80,93,47,50,00,3943 
1008 DATA 00,97,00,80,05,62,A47,00,80,08, 
62,40,16,52,15,52,AD,15,62,498,AD,14,62,4 
8,AE,05,62,20,47,62,AD,05,2525 
1007 DATA 52,18,69,01,80,05,52,AD,05,42, 
59,00,8D,05,52,AD,05,62,C9,00,D0,05,AD,0 
5,62,69,10,F0,01,60,59,58, 2828 
1010 DATA 50,80,79,52,85,C00,BD,A9,62,85, 
C1,80,DF,47,AA,BD,BY,42,85,C2,BD,BD,52,8 
5,05,A2,0E,BC,7B,62,81,00,4855 
1911 DATA 29,F3,05,C2,71,C0,BC,8A,62,Bl, 
C6,29,.FC,05,C6C3,71,C0,CA,10,E7,60,01,02,0 
3,04.05,28,27,2A,2B,2C,4F,3292 
1012 DATA 50,51,52,53,00,01,02,03,04,27, 
28,29,2A,28,4E,4F,50,51,52,84,89,8E,73,F 
9,FE,03,08,6E, 73,79, 70,E3,2710 
1013 DATA Ed,„ED,„F2,58,58,58,50,58,28,97, 
59,59,59,59,59,597,59,59,59,00,04,08,00,0 
0,01,02,03,00,00,A?,01,80,2470 
1014 DATA C1,62,59,00,80,62,82,4C,D2,62, 
D1,52,AD,D1,62,49,AD,DO,652,48,A0,0A,98,1 
8,0A,0A,AA,BD,48,63,.80,F0,39764 
1015 DATA 49,00,49,53,80,F1,47,BD,4A,85, 
80,F?2,47,BD,4B,53,580,F3,49,AD,C1,62,9E,F 
0,47,DD,DF,47,DO,1E,AE,F1,454B 


1015 DATA 49,DD,DF,49,00,15,AE,F2,47,DD, 


DF,47,D9,0E,AE,F2,47,DD,DF,49,00,05,AE,C 
1,62,58,58,50,88,00,87,AD,4738 

1017 DATA C1,52,18,657,01,80,[01,62,AD,C2, 
52,659,00,80,C2,52,AD,C2,52,C9,00,D0,05,A 
D,C1,42,0C7,03,F0,01,680,58,3944 

1018 DATA 58,50,00,00,00,00,00,01,02,053, 
04,05,05,07,08,07,0A,0B,0C,0D,0E,0F,00,0 
4,08,0C,01,05,097,00,02,08,380 

1019 DATA 0A,0E,03,07,0B8,0F,00,05,0A,0F, 
05 ‚os ‚07,00, Ed, Kl 4 Do ‚O7,EE, DE, 47 ‚47 ‚OD =) 
D,C7,47,50,CE,DE,47,A9,0D, 2459 

1020 DATA 80,C7,497,50,00,00,00,8E,8C,63, 
49,00,8D,8A4,53,49,00,80,8B,43,4C,9F ,63,9 
E,653,AD,FE,63,48,AD, 70,63, 39807 

1071 DATA 48,AD,84,55,494,B0,05,49,03,4C, 
B5,53, AD,8C,53,AE,F0,47,90,DF,49,AE,Fl,4 
9,70,DF,47,AE,F2,49,970,DF „4427 

1072 DATA 497, AE,F3,47,70,DF „47,20,07 ,82, 
AD,8A,63,18,57,01,80,84,63,A0,86,63,69,0 
0,80,88,53,AD,88,42,09,00,3578 

10253 DATA DO,05,AD,8A,53,C7,09,F0,01,80, 
68,68,60,A2,0A,EC,DE,49,90,07,F0,05,A7,4 
B,4C,053,64,A? ,06,90,51,589,3502 

1024 DATA CA,DO,EC,60,00,00,00,00,00,00, 
0000,00 ,00 ,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,742 

1025 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00 00,00, 00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1025 DATA 60,00,00,009,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

10627 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00 ,00,00,00,00,00,00,00,0 
0,00 ,00,00,00,00,00,00,00,0 

1028 DATA 09,00,00,00,00,00,00,00,00,00, 
00,00, 00,00 ,00,00,00,00,06G,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1029 .DATA.00,00,00,00,00,00,00,009,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00 ‚oo,00, alu el ee) ‚o0,00,0 

1030 DATA 00,00,00,00,00,00,00,00,00,00, 
O0 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1031 DATA 09,00,00,00,00,00,00,00,00,00, 
ei) „Od „oc „oo „Oo, 00,00 ‚OO,0c, CO, OO ‚oo ‚Do „co 
0,00,00,00,00,00,00,00,00,0 

1032 DATA 00,00,00,00,00,00,00,00,00,00, 
00, 00.,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 








August/September '86 





— 








ii H 


Die 


1533 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,.00,00,00,00,00,09,00,00,00,00,00,0 
9,00 ,00,00,00,00,00,00,00,0 

1054 DATA 00,00,00,00,090,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1035 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,06,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1036 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1037 DATA .00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00 ,00,00,00,00,00,00,00,0 

1058 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1037 DATA 00,00,00,00,00,00,00,00,09,00, 
00,00, 00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1040 DATA 00,00,00,00,00,00 ,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
,00,00,00, a8) ‚e0,00,00, DC, ie 

1041 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00, 00,00,00,00,00, # 

1042 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1043 DATA 00,09,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1044 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00 ,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1045 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00 ,00,00,00,00,00,00,00,00,00,00,00,0 
ale ä 00,00,00,00,00,00, ae) h) [* 

1046 DATA 00,00,00,00,00,00,00,00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1047 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1048 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,.00,00,00,00,00,0 

1047 DATA 00,00,00,00,00,00,00,00,00,00, 
20,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1050 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00 ,00,.00,00,00,00,00,00,0 

1051 DATA 00,00,00,00,00,00,00,00,00,00, 
00, 00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,09,0 

1052 DATA 00,00,00,00,00,00,00,00,00,00, 
00,09,00,00,00,00,00,00,00,00,00,00,.00,0 
0,00,00,00,00,00,00,00,00,0 

1053 DATA 00,00,00,00,00,00,00,00,00,00, 
00.,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,0 

1054 DATA o0,00,00,00,00,00,00,.00,00,00, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00 ,00,00,00,00,00,0 

1055 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,70,70,F0,47,25,58,,560 

1056 DATA 46,4N,68,06,06,70,70,70,44,75, 
S58,04,04,04,04,04,04,09,04,04,04,04,70,7 
0,F0,536,55,5A,41,00,58,70,1919 

1057 DATA 70,F0,47,25,50,46,85,58,06,06, 
70,70,70,43,73,28,04,04,04,094,04,04,04,0 
4,04,04,04,70,70,F0,56,55,2155 | 
1059 DATA =A441,25,58,00,00,00,00,00,00, 
00 ,90,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,23,21,30,34,21,29,538 

1059 DATA ZE,00,32,25,24,00,37,27,2E,33, 
00 ,00,00,00,00,00,00,00,00,00,00,00,00,0 
.0,00,00,00,00,00,00,00,00,342 
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1050 DATA 00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,63,& 
1,70,74,61,67,6E,00,82,&0,942 

ı\O51 DATA 75,65,00,77,67,6E,73,00,00,00, 
00,00,00,00,00,00,00,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,AD,DE, 1062 

1052 DATA 49,F0,00,A9,00,80,30,02,A9,68, 
8D,51,02,4C,E0,68,49,25,80,30,02,99,68,8 
D,31,02,49,00,80,02,58,49,3194 

1063 DATA 00,8D,C3,58,49C,EF,689,EE,58,AD, 
EE,68,48,AD, ED ‚9,48, 4C,FC, 58,00 ‚00 ‚Ar,o 
0,8D,FA,68,80,FB,58,AD,FA,4387 

1054 DATA 68,18,57,01,8D0,FA,68,AD,FB,68, 
57,00,8D,FB,48,C9,00,90,EB,AD,FA,68,09,& 
#,70,E3,AD,1F,D0,C7,07,F0,4478 

1955 DATA 0A,68,58,AD,1F,00,09,07,DO,FF, 
20,AD,C2,58,10,67,01,80,C2,58,AD,C3,68,6 
7,00,90,03,598,AD,C3,58,07,4121 

Iio55 DATA 07,D0,05,AD,C2,38,C9,00,F0,01, 
50,68,58,580,CE,F4,49,AD,F4,49,29,07,80,0 
4,D04,C9,07,00,1D,EE,20,58,3962 

1057 DATA EE,20,68,EE,45,58,EE,20,54,AD, 
=0,58,D0,0C ,EE,21,58,EE,21,68,EE,46,68,E 
E,21,54,AD,21,58,09,56,970, 3883 

1058 DATA 25,AD,20,58,09,84,90,10,47,55, 
80 ,20,58,80,20,58,80,45,68,80,20,54,49,5 
A,8D0,21,58,80,21,58,80,45,320&4 

1057 DATA 58,890,21,54,80,AE,F5,47,E0,08, 
FO,0A,BD,BD,597,AA,88,D0,FD,CA,DO,FA,&0,3 
2,20,28,23,1E,17,14,0F,09,3708 
AD,FA,497,07,02,00,04,20,73,54,60,AD,FB,4 
7,C9,02,00,04,20,BE,4A,40,3471 

1071 DATA 20,51,5A,50,609,01,00,1A,AD,Fa, 
47,09,02,00,04,20,C04,5A4,650,AD,FB,49,C09,0 
2,00,04,20,07,50,50,20,A9, 3453 

1072 DATA 54,50,09,02,00,24,AD,FA,49,C9, 
02,00,04,70,56,6B,50,AD,FB,49,09,02,00,0 
4,20,61,68,60,AD,FA,47,DO, 3829 

1073 DATA 08,AD,FB,497,00,03,20,44,5B,&0, 
20 ,6C,68,50,AD,F7,49,19,0A,0A,60,F6,49,A 
A,BD,0D,SE,28,E7,03,80,18,33974 

1974 DATA 47,ED,1D,5E,18,697,0C,80,A0,47, 
&0,AD,0A,D2,C7,0A,B0,19,AD,0A,02,29,03,8 
D,F6,49,A0,09,02,29,053,80,32809 

1075 DATA F7,49,A9,01,80,F8,49,49,08,80D, 
C&,47,50,AD,0R,D2,29,03,80,F5,47,AD,0A,D 
2,29,03,80,F7,49,A9,01,80,3741 

107& DATA F8,49,A9,06,80,05,49,650,AD,0A, 
02,27,03,80,F6,47,AD,0A,0D2,297,05,80,F7,4 
7,97,01,8D0,F8B,49,A9,064,80,3747 

1077 DATA C5,49,50,EE,F9,49,AD,F9,49,29, 
01,F0,01,50,EE,A4,47,AD,A4,49,C09,03,F0,0 
1,60,49,02,80,F8,49,A9,07,4055 

1078 DATA 80,05,47,&50,EE,F9,49,AD,F9,49, 
29,03,F0,01,50,EE,A4,49,AD,A3,49,09,03,F 
0,01,60,47,02,80,F8,49,497,4172 

1077 DATA 07,80,C5,49,A9,0E8,80,C4,49,99, 
03,8D,FA,47,AD,F5,47,80,C00,49,80,01,49,4 
D,F7,49,80,CF ,49,80,03,49,4518 

1080 DATA &0,EE,FF,49,AD,F?,49,29,03,F0, 
091,50,EE,A4,497,AD,A4,49,09,03,F0,01,50, A 
7,02,0D0,F8,47,A9,07,80,05,3108 

LOB1l DATA 49,A9,0C,80,C5,49,A9,03,80,FB, 
497, AD,F&,49,00,CE,49,80,02,49,AD,F7,49,8 
0,00,49,80,04,49,40,AD,0A,4258 

1082 DATA 02,C9,05,B0,0A,A9,05,8D0,F8,49, 
AT,08,80,C5,49,50,A9,05,80,F8,49,A97,08,B 
D,C6,49,50,A97,03,80,F8,49,3874 

1083 DATA AF,08,80,045,49,50,EE,F9,49,AD, 
FF,497,29,03,F0,01,680,CE,A4,47,AD,A4,47,F 
0,01,50,A7,00,00,F8,497,50,4038 

1094 DATA EE,CC,49,A2,03,BD,C4,49,F0,17, 
9D,00,497,09,98,49,658,48,A49,A5,48,89,02,6 
B,458,B7,C1,68,48,50,47,00,4135 

1085 DATA 7D0,C4,47,80,C00,497,09,98,A7,6B, 
#5,A49,BC,48,597,DE,58,48,B7,DD,5B,48,60,C 
A,10,CB,60,79,5E,99,6E,79,4298 

1095 DATA 8E,99,6E,65,68E,6%,6E,75,6E ,99, 
GE, 7B,6E,81,6E,6F,8E,87,6E,0D,6E,D8,5E,F 
8,5B,01,60,09,5C,13,50,10,3539 
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1087 "DATA lc, 75, Er DE,&C,26,&0D, 4 ‚OD, gF, 

sD,CF,öD,FF, AD, Au I BE, an, BE, a9, 00, an -O1,D 
2,90 ,00,D2,40,A9,00,8D, 03, 3626 

1068 DATA D2,80,02,02,40,49,00,80,05,D2, 
50,04,D2 ‚s0,AF,o0, 50,07,D2,8D, 065, 0D2,50,0 
E,CB,49,A40,08,49,00,05,49,3922 

1087 DATA 00,80,C0,49,AC,C8,49,B9,39,6C, 
80 ,00,02,49,44,80,01,D2,60,F9,FA,FB,FC,F 
D,FE,FF,FS,EBR,E1,D7,00,0C5,5417 

1070 DATA BF,AF,AS,FE,71,87,70,75169,5F, 

54,55,50,48,46,41,30,37,232,28, IE, ia, OA, 
4,1E,28,32,37,5C0,41,46,4B8,2595 

1071 DATA 50,55, 5%,3F.,569,73,7D,07,71,78, 
AS3,AF,B#,C5,CD,D7,CE,0#,47,#0,07,49,D0,0 
5.497,01,80,C6C1,47,AC,C9,49,4453 

1072 DATA: B9,972,5C,00,02,D2,997,E4,80,05, 
D2 40,F9,FA,FB,FE,FD,FE,FF,FS,EB,E1l,D7,C 
0,C3,B9,ArF,A5,98,71,87,70,5808 

1093 DATA 73,69,5F,3A,39,00,48,48,41,3C, 
37,32, 28,1E,14,0A9,14,1E,26,32,37,30,41,4 
5,.38.50.55,5A.5F.,69.73.70.2205 

1074 DATA 87,71,98,A5,AF,B7,C05,CD,D7,CE, 
CA,49,AD,CA,47,44,48,D00,05,A7,02,80,C02,4 
1095 DATA 50,90,04,02,60,01,02,03,04,05, 
05.07,08,09,0A,0B,0C,0D,0E,OF,10,11,12,1 
3,14,15,18,17,18,17,1A,1B,758 

1695 DATA .1C,1D,1E,0A,01,01,09,02,02,08, 
03,03,07,04,04,08,05,05,05,05,05,04,04,0 
4,03,03,03,02,02,02,01,01,205 

1077 DATA 01,CE,CA,47,AD,CA,47,4A,4A,4A, 
29 .03,A9,.89,44,50,80,05,02,89,40,6D0,80D,0 
4,02,580,FF,FE,FD,FC,AZ,Al,422B 

i07d DATA. A2,A3,CE,CA,49,AD,CA,49,4A,A8, 
00,05,49,02,80,02,49,89,64,60,80,05,D2,B 
2,.82,50,80,04,0D2,680,0A,0A,5755 

1074 DATA 0A,09,07,097,08,08,09,07, 07,07, 

O6, 06,0 05,05, 05,04, 04, 04,05, 5, 03,02,0 
2.02,0L, 01,01,01, ö7 ‚03,04, 155 

1100 DATA o5, O6, 3? ‚08,097,0A,0B,0C,0D,0E, 
oF,10,11,12,135;14,19,168,17, 18,19, iA, 16,1 
C, ID, IE,CE, CB,47,AD,CH,47, 1380 

1101 DATA AA ,4R, 4A AB, D0,05,A9,00,80,C0, 
47,89,07,50,80,01,02,B7,BE,60,80,00,02,& 
0,54,50,44,30,32,29, 1B,0F ,338& 

{102 DATA 02,01,02,05,04,05,05,08,0A,0£E, 
CE,C9$,49,AD,C9,49,44,4A,4A,#8,00,05,49,0 
1,80,C1,49,B9,F7,50,80,03,2847 

1103 DATA D2,B9F,EE,£D,80,02,02,50,59,50, 
46,3C,32,28,1B,0F ,02,01,02,03,04,05,05,0 
8,0A,0E,CE,CB,47,AD,CO,47,2603 

1104 DATA 4A,4A,44,44,A98,00,05,A9,00,8D, 
Co,47,89,297,5E,80,01,D2,B9,1F,5E,8D0,00,D 
2,60,02,02,0F ,1B,28,32,3C,2709 

1105 DATA 45,50,5R,0E,0A,08,08,05,04,05, 
02,01,CE,C9,47,AD,09,49,44,4A,4A,4A,AB,D 
0,05,49,01,80,C1,49,B9,5B,2750 

1104 DATA sE,80,03,D2,B9,51,8E,80,02,DZ, 
50,02,02,0F,18,29,32,30,468,50,5A,0E,0A,0 
8,05,05,04,03,02,01,A9,3C0,2007 

1107 DATA 860,C9,497,50,49,3C,80,097,49,40, 
A7,47,80,09,49,50,49,1D,80,CA,49,50,A9,1 
D,80,CA,49,50,A7,47,8D0,C8,4002 

1109 DATA 47,50,49,8F ,080,08,47,40,A9?,8F, 
80,67,47,50,49,00,80,C8B,49,50,50,CE,CB,4 
7,AD,CB,437,00,05,A7,05,50,4045 

1107. DATA C3,47,AD,CB,49,4A,4A,4A,A9,B7, 
C4,5E,80,05,D2,AD,CB,49,29,01,48,B9,C2,& 
E,68D,07,02,50,94,95,42,01,4241 

1110-DATA F3,A2,A2,C01,C1,F3,F3,A2, AZ; AZ, 
A2,C1,C1,C1,C1i,FS,F3,F3,F3,A9,#RB,80,C8,4 
7,650,20,39,54,20,10,55,20,5032 

1111 DATA AB,5F,20,E8,58,20,07,52,AD,DD, 
49 .09,03,590,03,20,C8,59,20,03,62,00,00,F 
0,06,20,74,6553,20,00,63,20,3237 - 

1112 DATA F3,65,AD,DE,437,F0,04,0C9,0A,DO, 
D4,70,604,68,4C,DF,5E,00,00,00,00,00,00,0 
0,00,00,00,00,00,00,00,00,242& 

1115 DATA 00,00,00,00,00,00,00,00,00,00, 
CC, OO, Od, 00,00 ‚o0,00,00,00, Do, oc) ‚oc ‚oo PL 
0,00,00,00,00,00,00,00,00,0 
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1114 DATA.00,00,00 ‚00,00, DO% 00, CH, Och ‚oo, 

00,00,00,00,00, oc, 00,00,00,00,00, 0 ‚00,0 

0.,00,,00 ,00 ,00,,00,00,00,00,0 

1115 DATA 00,00,00,00,00,00,00,00,00,00, 

007,00,00,00,00,00,00,00,00,00,00,00,00,0 

0,00,00,00,00,00,00,00,00,0 

11164 DATA 00,00,00,00,00,00,00,00,00,00, 

O0 00,00, O0, O0, 00,00. GC „O0. CC O0. 00, 0c, 6 

0,00 ,00,00,00,00,00,00,00,0 

1117 DATA 00,00,00,00,00,00,00,00,00,00, 

00,00,00,00,00,00,00,00,00,00,00,00,00,0 

0,00,00,00,.00,00,00,00,00,0 

1118 DATA:.00,00,00,00,00,00,00,00,00,00, 

O0, O0 „00.0000 ,00,00,00,06,00,00,00,00,0 

U: 50, 60, O0, 0, 60, 00,00,00,0 

1117 Data O0, ala 00, 00,00,.00,00,00,00,00, 

00,00,00,00, 00, 06,00,00, 00, 00, 00,.00,00,0 

0,00,00,,00 ,00,00,00,00,00,0 

1120 DATA 00,00,00,30,7E,3C,18,00,18,18, 

0A,24,29,45,45,45,45,15,00, 10, 7E, 7E, 7041 

C,1E,0E,00,70,70,70,70,7E,27B% 

1121 DATA 7E,>E,00,00,3E,7B,7E,70,7F,3F, 

00,00, 7E,7F.07,7F ,56F,7F „00,00, 7E,7E,7F,6 

7.,57,67,10,10,00, 7E,10,10,2332 

1122 DATA 7F,7F,00,00,587,67 ,67, /F, 7Fı3E, 

00,00,00,00,00,81,FF,FF,FF,FF,FF,FF4FF4F 

F,FF,FF,FF,FF,581,20,00,00,41977 

1123 DATA 00,00,00,09,7C,7E,3E,00,00,00, 

00,00,00,00, ia, sC,5C,18,00,0E,1E, SC, 78,7 

0,60, 0, 00, SE, Er, 4B, 52 ‚67, {338 

1124 DATA SF „1E,00, IC, 3E,SEJ1E, JE, 7F,7r, 

00,5E,67,0F,1E,3C,’F, Tr, o6,7E,0C,18,0E,7 

FrtFısEı 00, oc, ee SC ,AE, ’F,1768 

1125 DATA IF „0E „00, 7E 60, 7E,0T,867,7F SE, 

00,36,50,7E,67,7F,7F,3E,00,7F,07 ,0E,1C,3 

C,3C,360,00,30,66,3E,67,7F,2297 

1126 DATA 7F,3E,00,30,664,37,07,4F ,7E,3C, 

00.,18,3C.3C6,00,30,3C,18,FF,FF,DD,DD,F7,F 

7,FF,FF,OF,1E,3C, 78,36 ,1E, 3245 

1127 DATA 0F,07,00,7C,3E,00,00,7C,3E,00, 

FO,FB,SC,1E,3C,78,F0,E0,00,3E,ö4F ,OF,1E,0 

o,18,14,FF,DF,DF,F?,F7,DF,3300 

1178 DATA DF,FF,00,18,3E,7F,67,7F,7F,87, 

00,70 166, FE 574 7F sFr FE, DO, IC, 56,60,75,7 

F,’/F,3E,00,789,8E,57 ,67,7F,3246 

1127 DATA F7F,7E,00,7F,78,7Fy37B1 Fr HFı Fr, 

00,7F,70,7E,78,78,70,76,00,3E,70,76,73,7 

F,7F,3E,00,77, 774 7F 1 F 1 77,5515 

1130 DATA 77,77,00, 7E,1C,1C,1C,7Fy7Fys FF, 

00,07,07,07 ,AF ,7F,3F,1E,00,77,76, 70, 76,7 

E,77,77,00,70,70,70,7F,7F,2508 

1131 DATA 7F,7F,00,63,77,7F,6B,63,77,77, 

0046787747 F Aa TF sFF+s6F „67,00, 30,67,67,67,7 

F, SF, 1E,00,7C ‚68,87, TE. TE, 3031 

1137 DATA 70,70,00,30,57,57,67 ,/F ‚7E,SD, 

00,70,67,57 , 7F,7E, 76, 7B,00, 3C, 80, SE,07,3 

ETF TE BOT FF FE, 36,30, 2772 

1133 DATA 36,36,00,67,67,67, /Fı 74 7 Fr Er 

00, 57,67,6747743F,1E10C,00,85, 5B,4B,„7F,?7 
E,77, 63, 00, 67,67 ,30,30,7F,2707 

1134 DATA 77, 23, 00,57,67, 36,16, 10, 1C,1C, 

ob, 7F,0E,1C, 30, ’F, IF, IF, o0,1E,18,38,39, 3 

E, 3E. 00, ‚SA, SA, SA, 5A,5A, SA, 5038 

1135 para SA, SA, 00, ’8,18, IC,1C,7C, 7C,09, 

3E,81,60,45,BD, Aı,aı, ‚TE,SE,81,80,#5, Al, 2 

0.81 JE ,PF,D7,55,55,59,59, 3674 

1136 DATA D7,FF4FF DT? , 55, 351 94 urF, 

00,00,02,02,0A,09,2A,00,00,00,05,03,0F,0 

F,3F,00, TER Sa „4 A| Pi u Se 2413 

i137 DATA 40,00,55, 39, 39, 384 as, ads, 0, 

a Pe Pe Pl SA, SA, 6A,O0, SI, 55, 57, 57,57, na 

F,7F,00,AA,AA,AB,AB ‚AO,AO, 2944 

1138 DATA 80,00,FL, Fc, Fi1,F1,0C5,05,15,13, 

AR AR „AA „AA, BA „AR ‚AR, 00 AR, AA AB, AB,AFsA 
F,BF,OO,FF,FF,FC,FOC,FO,FO,5457 

a DATA CO,00,FF,FF,FD,FD,FS,FS, 05,00, 

FF,FFJ,FE,FE,FA,FA,EA,OG, FFFF,FF, FF ‚FF4F 

F FF, 00,00,00,00, 00, 0, 00,5448 

1140 DATA 00,00,00,00,01,01,05,05,15,00, 

alu 00.02.02 OA,oA, 2A,009,00,00 05, O5, 0F,0 

F 33 ,00,54,54,50,50,40,40 ,654 
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1141 DATA 00,00,54,54,51,51,45,45,15,00, 
>4,54,52,92,44,49,24,00,54,54 1 
F,3F,00,A8,AB,A0,A0,80,80,2478 

1142 DATA 00,00,49,88,A1,A1,85,85, 15,00, 
A8,A2,A2,42,04,84,24,00,A8,AQ,A3,83,8F,B 
F,3F „00,FC,FC,FO,F0,C0,00,4302 

1143 DATA 00,00, FC,FC,F1,F1,C5,C65,15,00, 
FE,FC„F2,F2,CA,CA,2A,00,FC,FCUFS,FS;CF,C 
F.3F,00,00,00,00,00,00,00,4302 

1144 DATA 60,00,00,00,01,01,05,08,15,15, 
>0,00,02,02,0A,0A,2A,2A,00,00,03,03,0F,0 
F,SF,3F,55,55,54,54,50,50,B72 

1145 DATA 40,40,55,55,55,55,59,55,55,55, 
55,59 ,56 55459, 59 ,69,64,55,55,57,57,39F,3 
Fs?F FF, AA,AA,08,AO,A0,A0,3326 

1146 DATA 80,80,AA,AA,AF,AF,A3,45,95,95, 
AA AA, AA ,AA AA, AA, AA, AA, AA, AA, AB, AB,AF,A 
F,BF,BF,FF,FF,FC,FC,FO,FO,5B30 

1147 DATA C9,CO,FF,FF,FD,FD,FS,F5,D5,D5, 
FF,FF,FE,FE,FA,FA EA, ,EA,FF4+FF,FFSFF+AFF4F 
F,FF,FF,00,00,00,00,00,00,6342 

1148 DATA 00,00,00,00,01,01,05,05,15,15, 


00,00,02,02, 0A ,04 ,24.,24,00.,00,03,03,0F ,0 


F,3F ‚7 ,094,54,50,50 „au ‚#0 ,780- 
1147 DATA 00,00,54,34,51,51,45,45,15,15, 
34,34,92,92,43A,4A,2A,29,54,54,53,53,4F,4 
F,3F,3r,A8,A8,A0,A0,80,80,2404 
1150 DATA 00,00,A8,A8,A1,#1,85,85,15,15, 
A8,n9,92,42,84,84,24,24,A8,A0,A3,A3,8F,8 
Fr3F,3F,FC,FC,FO,F0,00,C00,4428 
1151 DATA 00,00, FC,FC,F1,F1,05,05,15,15, 
FC,FC,F2,F2,C#,CA, 2A, 2A, FC,FC,FS,FS,.CF.C 


100 DIM CIOFt40) „PUFFERE(32767) ‚ESECi2}, 
SSEC.(?) | 

110 FANZAHL=2 

111 SSECtII=1:ESECiL)=48 

112 ESECI(2)=49:ESEC {23 =B6 

140 GRAPHICS 6:SETCOLOR 2,0,0:7 
EHAHIA 1.1 Linker 

ank T. Wittenmayer' 
150 RESTORE FO0:FOR %X=1 TO 40:READ A:cıo 
SiK)eCHR#iA):NEKT X 

200 FOR FILE=si TG FANZAHL 

210 GOSUB 300 

220 NEXT FILE 

270 GOSUB Sü0: END 

00 7:7 "Cassette mit "iFILEI", 
nlegen":?7 “ RETURH " 

10 OPEN #1,4,128,"C:" 

320 ERR=USRCADRICIOF) „1,7 ,ÄADRIPUFFER#)+5 
SECIFILEI#128-128, (ESECIFILEI-SSECLFILE) 
+1) #128) 

330 IF ERR>127 THEN 7 " “a Cassetten E/ 
A Fehler ##& ":END 

>40 ELOSE #1:RETURN 

500 7 27 "Leercassette einlegen, RETURN 

":OPEN #1,8,178,"C:" 

10 ERR=USRADRICIOS) „1,11,ADR{PUFFERS), 
(ESECIFANZÄHLI-SSECIIIFII#I2B) 

520 IF ERR>127 THEN 7? " ww Cassetten E/ 
A Fehler ###= "END 

550 CLOSE #1:RETURN 

700 DATA 104,104,109,24,10,10,10,10,170, 


CUTTL 


File ei 


Fantastische 
| Grafik, 
tolle Spielidee, 


Allerdings waren die Techniker bei ihren 
Probebohrungen nicht sehr vorsichtig 
und haben mit ihrem Bohrmeißel allerlei 
Ungeziefer geweckt, das nun durch die 
unterirdischen Gänge wandert und dar- 
auf warte, den nächsten Eindringling zu 
vertreiben, Dieses Ungeziefer hat jedoch 
nicht mit Jack gerechnet, der in seinem 
alles verschlingenden FreßBrausch selbst 


vor diesen Widersachern. die nicht so 


dumm sind, wie sie aussehen, halt macht, 
sie erkennen sehr schnell, daß die Ollei- 
ins Jacks schwache Stelle ist, die sofort 
das Ziel ihrer Angriffe wird, 

Hat eines der Monster die Leitung be- 


Bei „Jack the Dieger* werden Ihnen vor 
Aufregung die Haare zu Berge stehen! 
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F,3F ,3F,00,00,.00,00,00.00.4478 








104,104,157 ‚&6,3. 104,157,69,3,104,157,60 
‚3,104, 157,73,3,104,187 

310 DATA 72,3,32,96,228,132,212,169,0,17 
3.213.976 






Nach langem Suchen hat Jack einen neuen Job bei der Ölfirma 
ATRIOL gefunden. Doch es soll kein Zuckerschlecken für ihn wer- 
den. Wie aller Welt bekannt, ist Jack ein gefräßiger Kerl, der alles, 

was ihm in den Weg kommt, in sich hineinstopft. Dieses Verhalten 
macht sich nun .die besagte Ölfirma zunutze und spannt Jack vor 
eine Ölleitung, um das ı im Erdreich vermutete schwarze Gold zu 


fördern. 
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rührt, wasals Fehler angerechnet wird, so | 


muß Jack sich zurückziehen, damit der 
Schaden behoben und. die Arbeit -fortge- 
setzt werden kann. Zu Beginn des Spiels 
darf Jack sich diesen Fehler 3 mal leisten, 
dann feuern ihn die Olmultis, und das 
Spiel ist zu Ende. Gute Leistungen hono- 
rieren die Bosse damit, daß Jack sich weı- 
tere Fehler erlauben darl, und zwar wird 
die Zahl alle 10000 Punkte um l erhöht. 
Allerdings: mehr als 6 Fehler gestehen 
die Bosse ihm nicht zu. Die Anzeige für 
die erlaubte Fehlerzahl befindet sich 
rechts oben auf dem Bildschirm. 

Da heutzutage ja alles möglichst schnell 
gehen muß, hat Jack für jede Runde nur 3 
Minuten Zeit. Sind die 3 Minuten um, so 
zählt dies als Fehler, Die Zeitanzeige be- 
findet sich oben in der Mitte, die Punkte 
werden links oben angezeigt. Für jedes 
verschlungene Monster bekommt Jack 
20, manchmal, wenn es dem Computer so 
beliebt, auch 40 Punkte gutgeschrieben. 3 


bei Gefahr für den Rückzug gebraucht 


rel Ol. 

Die Steuerung ist recht einfach: Jack be- 
wegt sich in die Richtung, in die der Joy- 
stick gedrückt wird, jedoch nur, wenn das 
Feld (rei ist und sich dort Öl befindeı. 


Folglich kann er seine Ölleitung nicht 


kreuzen. Durch Drücken des Feuerknop- 
[es wird erreicht, daß Jack sich rückwärts 
entlang der bisher verlegten Ölleitung be- 
weet, die dann eingezogen wird. Es emp- 
fiehit sich, immer den kürzesten Weg zu 
nehmen, da dann natürlich die Zeit, die 


wird, kürzer ist. 


Wenn Sie nach dem Spielende START 
drücken, werden die IÜ besten Punktzah- 
len ausgegeben und Sie können sich 
eventuelleintragen. Ist die Liste vollstän- 
die ausgegeben, besteht die Möglichkeit, 
sie durch Betätigen der Taste S auf Dis- 
kette abzuspeichern. Ein Spiel mit dem 
gleichen Schwierigkeitsgrad wie im vor- 
herigen Spiel kann mit START begonnen 
werden, Die SELECT-Taste startei den 


| Vorspann, der Ihnen auch die Eingabe ei- 


nes neuen Levels ermöglicht. Wollen Sie 
eine neue Highscore-Liste beginnen, 
müssen Sie bei der Abfrage, ob die Liste 


geladen werden soll, mit Taste N antwor- 


ten. 

Da der eigentliche Spielablauf vollstän- 
die in Maschinensprache geschrieben ist, 
sollten Sie beim Abtippen der DATA-Zei- 
len von 20000 bis 20 710 achigeben, daei- 
ne falsche Eingabe zum Absturz des 
Rechners führen kann. Wenn das Pro- 
eramm gerade frisch geladen wurde, so 
dauert das einPOKEen der Daten circaei- 
ne halbe Minute, ansonsten nur ein paar 
Sekunden. Sollte das Programm einmal 
nicht richtig laufen, nachdem $ie BREAK 
eedrückt und es erneut gestartet haben, 


so geben Sie bitte POKE 32256,0 und 


dann RUN ein. 


Viel Spaß beim Öl- und Mon- 
sterschmaus! 


Punkte erhält er für jedes gefressene Bar- 


REM Dee te 5 7 022/02 205.202 02000200 
»* 


{bc} 8 

‘<GJ> 1 REH * 

8G> 2 REH = JACKE THE DIGGER # 
GL? Z REH # u; 
£ı0> 4 REH # ic) 2.2.1986 by " 
GH} 5 REM # * 
<öoN> 6 REM # Jens Berke o# 
<GP> 7 REM # # 
<bDE? BB REH EB Rue En 0000 .5.0.30. 2.000.000 02 
<BH}> 9 REM 


{ep> 90 DIM AScC44),8B5 0183,09 C40) ,Pi10),M 

5ti110):G05UB 10080 

<Mmo> 91 FOR a=ı TO A8:REAb B:ıBFCA,AI=CHRA 

S£BJ ENEKT A 

<ır) 972 DATA 104,104,1377,207,104,133,206 
‚104,104,168,169,0,145,206,136,208,251,9 

6 

<cPp> 180 LE=SS:POKE 5569,0:I1F PEEKLI2256)- 

z17 THEN i1080 

<PE> 110 FOR A=i TO A4:READb BiAFtA,n’=ch 

RSCBI:MEHT A 

<b> 120 DATA 104,201,7,208,254,162,6,10 

4,149,211,202,.208,250,250,.212,2308,213,19 

0,212;208,4,138 

£JG> 130 DATA 213,240,18,161,216,129, 214 
‚220,216,208,2,230,217,230,214,200,234,2 

z0 , 218, 208,270,96 

£KM> 140 H=USRCADRCASI,.873744,11744,1024) 
IHSUSRCHDRCASFI ,37744,32768,10243 : RESTORE 
732008 

£FP> 1850 READb A:IF A=-1 THEN 178 

<IH? 160 FOR B=0 TO 7ıREAb C:POKE Z1744* 

GMd+B,C:POKE I2766+AH8+B,C:HEXT B:GOTO 1 
50 

{F0o> 170 FOR A=II TO 58:FOR 8>8 TO FiREA 
D CıPOKE I1744tAHdtB,C:POKE I2768+AHM9+B, 
C:ıHEHT B:HEHT A 

<EK> 196 FOR A=i16 TO 25:F0OR B=8 TO 7:REA 
BD CıPOKE ZiT4sätn®a+B,CıPOKE FI27bEBtaMttE, 
C:MEHT BIHEHT A 

<ba> 190 FOR A=2 TO S:RESTORE 32780:FoR 
8-0 TO TtREADb CiPOKE 31744tARd+B,C:HERT 
E:NEHT A 

<iG} 708 RESTORE Z0008:F0OR A=270668 TO I6 
Ta4:REAb B:POKE A,B:NEHXT A:GOTO 11000 
£JL> 900 RESTORE 206706: F0OR a=30273 TO 30 





T84:READ BiPOKE A,BıHEHT A:ıFOR A=203 To 

>209:POKE A,0:MEXKT A 

{KT 910 NSUSRCADR(BFI,33792,2557 :0=U5SREC 

ADREBSI,I4648,2553: FOR A=104 TO 200 5TEP 
24 1C=INTERHD COI RI) HLO:RESTORE 21086#+C 
{<EK> 920 FOR B=B TO 7ıREAD DIPOKE 33792# 
a+B,D:MEKT B8:C=IMT ERND (03 #10)# LO: RESTORE 
z1008+C 

£NA) 920 FOR B=e6 TO TrırREndb DIiPOKE Zz4048+ 

ätB,DiHEKT B:iHEHT A 


- £00> 940 FOR A=0 TO 9:B=INTERNDCBIELEIHL 


G+8:POKE ZOIS9+A,B:HEHT A 
{LI> 950 FOR A=0 TO 4:B=CINTCRNMDCBIMGI #1 


“OIMLS+INTERND COIHSI+A:POKE IOIS4+rA,B:MEN 


Ta - 

{MI 980 POKE 30294,5GıPOKE 0295,56 
{Ah> 999 REH Wei Bildschirmaufbau Hit 
{MM} 1000 GRAPHICS ZU:POKE 756,1Z4:POKE 

7172,154:P0OKE 7180,14:POKE 788,8:1POKE 709, 

6:POKE 559,0 

LE? 1010 DL=PEEK (5603 +256HPEEK (5613 :POK 

E DL+6,5t:POKE DL+8,5:POKE DL+28,PEEKISER 

3:POKE DL+29,PEEK (561) 

£PJ> 1020 POKE DL+27,65:1POKE bDL+9,132:P0 
KE DL+i2,1321POKE DL+15,1T2:POKE DL#+18,1 

ZZ:POKE DL#+21,132 

<EI} 10346 FOKE 627,1:POKE 53277,3:P0KE 5 

4279, 132:P0OKE 53278,0:P0OKE 512,213:1PO0KE 

517,116 

‘ch? 1040 COLOR 2:PLOT 1,0:DRAHTO 12,0:F 

LOT 26,08:DRAHTO T8,0:PLOT i6,2:bRAHTO 22 
2 

# 

<Hä> 1850 COLOR 5:PLOT 1,Z:ıbRAHTo 12,2:P 

LOT 26,2:BRAHTO 38,2:PLOT 16,4:bRAHTO 22 
Pi 

<Ka> 1960 COLOR 3:PLOT ®,1:PLOT 25 ,1:PL0 
T 15,3:C0L0R 4:ıPLOT 13, 1:PLOT 29,1:1PLOT 
23,3 

<äh> 1070 COLOR 8:PLOT 16,3:DRAHTO ZZ, 31 

PLOT 7,1:PLOT 31,1:DRAHTO 38,1:C0L0OR 8:P 

LOT 0,8:PLOT 25,8:PLOT i85,2 

<kC} 1080 COLOR 1:PLOT 13,0:PLOT 37,0:PL 

OT 23,2:C0L0OR &:PLOT 4,2:PLOT 25,Z2:PLOT 
15,4 

<bH> 10898 COLOR 7:iPLOT 13,2:PL0T 39, ZıPL 
0T 27,4 
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‘“DE> i100 POSITION 1,1:7 B&E;'"SCORE J00008 
OH: POSITION 26,1:7 BE; "Falls"; 

AG 11108 COLOR 66:PLOT T2,1:DRÄAHTO Zi#+L 
E,LiPOSITIOM 1B8,3:7 BG; "120": PI=8 

‘0OE> 1128 FOR A=8 TO 17 STEP T:COLOR 61: 
PLOT 8, A:DRAHTO 39,AıC0oLOrR 62:PLOT O,A#+i 
:BRAHTO 39,A+1:FOR B=i TO 2+cA’/Z<> INT char 
FE 

‘PCH 1170 C=ZINTERND COIM20I#2+L: TRAP 11I0 
:FOR D=-4 TO 4: LOCATE C+b,n,ZıIF Ziriel 
THEHN HEKT D:GoTo 1158 

<OM> 1140 POP :GOTO 11T0 

‘GM? 1150 COLOR 16£:PLOT C,A:PLOT G,Atl: 
FIZSPI#Z:MEHT EBE:HEHT A:TRap 40008 

{ap} 1160 COLOR 61:PFLOT 0,5:bRAHTo 39,85: 
PLOT 0,20:DRAHTO 39,20:C0L0OR 62:PLOT 8,6 
:BRAHTO 39,6:PLOT 8,2L:DRAHTO 19,21 

KB} 1178 COLOR F2:1PLOoT 19,5:PLOT 19,6:6 
üOLOR 53:PLOT 19,5 

‘BP> 1160 COLOR 181:F0R Aä=?7 TO 19 STEP I 
PLOT @,A:DRÄAHTO TI,Aaı PI=SPI+48:NEKHT ä 
FH} 1198 FOR Az0 TO 9:B=INT {Rh (0)#27550 
:POKE J0I44ta,B:iHMEHT A 

“PA> 1200 FOR A=z0 To I STEP T:ıPöKkE 307793 
+A,L1:POKE I0I80+A,2:POKE I0581+A,0:HEKT 

fe) 

“00> 1Z10 FOKE 299686,40:P0KE 2996I,8:POK 
E 18299,PI:P0OKE 559,62:0=USRC2900093: POKE 
77,0: POKE 536,90:50UMb 0,0,0,0 

‘FL> 1220 ON PEEK(2873 GOTO 28090, 3000 
‘PC? 1999 REH HHH Game over HH 

<C0? 2000 COLOR TZ2:PLOT 19,51ıPOKE 29964, 
Z54:POKE 293967 ,142:C0L0R 8:PLOT 17,10:DR 
AHTO 25,18:PL0T7 13,1F:bRAHTO 25,17 

‘cf? ZOLO POSITION 15,10:7 B6J"GAHMEJOVER 

":PO3ITIOM 14,13:7 BG }"PRESSJSTART"':POKE 
77,0 

HG} 2020 IF PEEKISITZFIIÄGE THEN 2820 
iLC> 2838 B=1:5CS0:ı FOR A=B TO 5:53C0=5C+8# 
PEEK (I0T07+A) ıB=ZBRHLO:MEHT A 

‘FB} Z040 GRAPHICS ZU: POKE 71Z,18:POKE 7 
18,1780:P0OKE 708,168: POKE 789,196:POKE 7i 
1,18:P0OKE 756,1274:G0SuB 40090 

“GJ> 2060 POSITION 14,0: SE O2 DD 

Fij*:coLoR LII:PLOT 14,1:DRAHTO 25,1 

‘DP> 2070 COLOR B8:PLOT 6,3:C0L0A i:PLoOT 
74,3:C0L0R &6:PLOT 6,23:C0L0R: ?7:PLOT 34,2 
E 

FF} 2080 COLOR 2:PLOT 7,Z:0RAHTo I7,T5:C 
OLOR Z:iPLOT &,4:DRAHTO 6,272:C0LOR 4:PLOT 
74,4:DRAHTO 34,22 

‘EC? 2890 COLOR 5:PLOT 7,23I:DRAHTO I3,27 
:COLOR B:FoR A=Sa To 22:PL0T 7,A:rDRAHTo 3 
Z,A:HEHT A 

“JM> 2100 FOR A=si TO LO:POSITION id-LENt 
STR#CAII , ZEAFF IT HE; A; "OH: IF ScH=PcA) AN 
Db 5SC<>=1 THEN 2200 » 

‘LM 2110 POSITION 12,2#A+2:7 B6;W5cCA#LO 
-37,4#10) 

iBM> 2120 POSITION II-LEN CSTRS CP CAI)I , 2 
Aa+2:?7 BE:;PeÄI:MEHT A 

“KB? 2125 TRAP 2125:CL05E BL:POKE 764,25 
u 
‘FB> 2130 IF PEEKCSEI27II=6 THEN LE=TıPOK 
E 5593,8:TRAP 400888:60T0 300 

“aH> 21408 IF PEEKRCEIZ2TII=SH THEN TRAP 400 
00: G0TO 11000 

<b0> 2150 A=SPEEKC7EAI: If At>6Z THEN Z1T30 
{HM> Zi60 OPEN HL,8,0,"D:HISCORE.DAT":? 

#1,M& 

ALI> 2170 FOR A=1 TO 10:7 H1,PLCAI:zNEHT A 
:CLOSE HLIiPOKE 764,255:6G0T0 2138 

“EN> 22006 POSITION F3-LENHt{STRF CSCIH ‚„ZHä+ 
2:17 B6;5C: COLOR S:ıPLOT 12, Z#At+t2:DpRAHTO Z 
L,2HAt+t2 

<FO> 2210 FOR B=108 TO Ati STEP -1L:PcBI=P 
8-13 : NS CB#10-9,B#10I SMF CCB- 13 #10 -#, (Bi 
3#103:NHEHT B:PLCAI=S5C 

IC? 22208 OPEN 82,4,08,'K:":D=D:FOR C=0 T 
0 9:NFCA#LO=-9tC , AH LO=-94C9H SCHAF CHI :HEHT € 
{HC} 2250 POKE 764,255:GET 8H2,CılF C=T2 


i . 
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THEH C=& 

“MK} 2240 IF C=155 THEN CLOSE #2:5C0=-1iM 
EXT A:GOTO 2170 

“GL? 22650 IF C=125 AND D>0 THEH POSITION 
41+0 ,2#4+2:7 R6ICHRS SI NS CAFLO-1O+0 , AR 
18-18+03=CHR3 (83 10 =D-1#£0>03:6070 Z770 
ÄFG? 2260 DESD+1#c0<183 : POSITION 1i1+0,2#4A 
+2:7 BESCHRAS CCH : HF CAH1O-1LO+D , A#1Nd-10+D) = 
CHRFCEI:GOTO 7770 

‘MG? 2339 REM ### Maechstes Bild sus 
‘GE} Ze88 GOSUB A000:GRAPHICS 18:POKE 7i 

2,248: POKE 7OD,242:P0KE 709,254 

DE} Z818 POSITION 7,3:* B6t"spitze":cHhr 

St1I:FOR A=B TO 15 STEP 8.1:50UND 8,100, 

12,4:50UN6b 1,101,12,A:MEHT ä 

{GP} 3020 FOR A=zı$5 TO 8 STER -8.1:50UND 
0,180,12,n:530UNDb 1,1081,12,A:HEKT A 

CI} 7050 7 H6:7 A667 HB DOCH NICH 
Ttı7 BEır mb; GUT GEHUG..,„*"' 

<aJ> 940 LU=SPEEK 302943 tLU=SLU-1#CL U} 14) 
:LE=-PEEK {SOZIFIIRESTORE 20670: FOR A=20%3 

TO 209: POKE A,B:HEHT A 

“FL? Z850 FOR A=I0273 TO IOT06:READ BıPpo 

KE A,BIHMEHT A:FöoR A=si TO SOo:MEHT A:POkE 
30297,LE:POKE 798294, LU 

“JL> I860 FOR n=I836% TO TBT7E:POKE d,0: 
MEHT ü 

{Mb}? 3078 7 BEICHRARSELZSI:FOR A=SO TO 240 
STEP 10:50UMD 8,4,10,15:NEKT A:SO0HDb 0,0 
‚&,B:POKE 77,0:G07T0 1060 

‘ED? 4800 FOKE 54286,64:POKE SI748,0:P0K 

E 53249, 0: RETURN 

<JC? 97999 REM MH Highschre-Liste laden 

KH 

<JE> 10000 GRAPHICS O:POKE B82,0:POKE 709% 
‚O:POKE 7i10,218:POKE 712,212:P0OKE 762,1: 

7 CHR$LC125I} 

{IL? 100108 ? "Soll die Highscore-Liste g 

eladen werden?":? "Gebe -J- oder -HW- ein 
IM> 10920 AZPEEK{7TE4I:IF A=266 THEN 188 

78 

DH? 168350 IF A=I5 THEH FOR Aa=1 TO 10:PcC 

AJZB:HEHT AıHFc1) Sr Jg inseiLo)eH" dt ndcd)e 

NS :RETURN 

“JCc> 10040 IF Af}ı THEN 10070 

“CL? 18856 TRAP 18070:0PEHN H1,4,0,"D:HI5s 

CORE.DAT":IHPUT Hi1,NS:ıN5=W$cC1i1,110) 

Ja) 10060 FOR A=zi1 TO 1B8:IMPUT Hi,B:PcAI 

ZB:MEKHT A:CLOSE Bi:RETURH 

‘FH? 100706 IF PEEKLCLISI=ZL7O THEN 7 ı?7T "A 

uf dieser Diskette ist keine Listerl":6oT 

0 19090 

‘CI? 108088 7 ı?7 HFEHLER- ":PEEKC1ISI 
“LL> 10898 ? :ı?7 "Druecke eine Taste..." 

FOKE 784,255: CL05E Bi 

<Jc$ 181006 IF PEEKC764I=S255 THEN 10108 
‘BH> 10118 GOTO 10008 

“Eb> 10399 REH He Vorspann HH 

‘GH? 11000 GRAPHICY Z8:1POKE 7Ti2,10:PoKE 
-11,12:POKE 718,18:P0OKE ?70%,2:P0oKE 708,2 
d6:POKE 5IZ748,0:PFOKE 53249,0:56G=1 

{HH} 118410 POKE 756,124:RESTORE 11500:DL 
=PEEK £56OI) +3 SGKPEEK (5613 :POKE DL+12,3:1P0 

KE DL+23,2 

BG} 11820 FOR A=l TO 5StREAb D,C9,.Yıror 

B=1 TO 39:C0L0R Z4d:PLOT B,Y:COLOR Z8:PLO 
T B-1,Y 

<EE? 11030 POKE 756,,128%#cCPEEK (75692124) + 

1Z4#LPEEKCFSGI =>128I1 ı FOR DBZa TO io STEP Z 
SOUND 0,0,0,D:HEKT D:SOUMD 8,0,8,8 

<FJ> 11040 NEHT B:FOöR B=3% TO 1 STEPR -1: 
POSITION B,Y:? B6:C5cB*+1,8*+1):C0OLOR 59:P 

LOT B-1,Y 

<HK> 11050 SOUND 0,PEEKES5Z770) ,18,6:NEKT 
5:50UMb 8,0,09,0:P0O5SITI0ON 0,Y:7 R&G;C#LL, 

Z3:MEKT Ää 

“IH? 11860 IF PEEK(S5SIZ79I=-6 THEN 11188 
‘HO> 11878 IF PEEKES5TI279) {5 THEN 11060 
<Nb} 110806 SG=Sc#t1:1IF 56G=5 THEN 6-41 
‘LL> 116098 POSITION 27,18:? B635G:FoR A= 
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15 TO 0 STEP. -09.5:50086 8,10909,12,A:50UuND 
0,0,0,8:HE#XT A:GOTO 110606 

£DC) 11180 7? HE;ICHRSLI125I POSITION 108,9: 

+ H6;"JUST A MONENHT PLEASE":5G=35-5CH6:G 
OTO 9080 

{IM> 11508 DAaTa 0, 

RESENTS Pe 
{Fr} 11Sı10 Data o,FFrererreerr FF EFF 

GEIHASIFFFFFFFFFFFrF ,7 
{KB} 11520 DATA 0, 

EL ı 1 ‚iL2 
‘EL? 11530 DATA DO, 
START ‚Id 
<cL}> 11540 DATA o,BcorvRIGHTBFEBRUARYBLF 

BEHdYEN-IEHSERBERKEN, 18 

£<Lc> 19999 REH mus Haschinensprache - Un 

terroutine Mk 

<80> ZO0eB DATA 104,169,175,141,70,2,169 
‚117,141,39,2,169,0,141,25,2,169,50,141, 

24,2 

£cä> ZB81O DATA 173,11,212,201,110,268,2 
49,169,192,141,14,212,1737,78,118,133,203 
L7E 

<LE> 20020 DATA 79,118,133,204,1608,0,173 
‚132,2; 2068,11,72,115,115,1693,30,141,83,1 

18 

<äH> 20030 DATA 76,214,114,169,0,141,1,2 

10,173,120,2,137,207,201,15,.206,1, 76, 214 
‚iid 

<aB> Z0040 DATA 281,14,248,53,201,13,248 
‚60,201,11,240,26,201,7,240,3,78,214, 114 
‚165 

{Lb> 20058 DATA 287,24,105,1,144,2,230,2 

04,133,207,169,2,141,77,118,76,242 ,113,1 

65 

<mo> 20060 DATA 205,56, 273, 1,176, 2.198,23 

04,1577,203,169,3,141,77,118,76,242, 113,1 

65 

<ab> 20070 DATA 207,56,237,40,176,2,198, 

204,133,207,169,4,141,77.118,76,242,117, 

i65 

{kW} 28090 DATA 203,24,105,408,144,2,238, 

204,137, 2087,169%,5,141,77,118,177,203, 201 
Pi. 

<PF} 20090 DATA 2088,25,169,1,141,93,118, 

141, 1,2108,141,95,118,141,0,210,169, 8,141 
‚36 

<cı) ZU108 DATA 118,141,94,118,76,65, 114 

‚201,129,240,3,76,214,114,162,0,1693,5,14 

1,84 

<PL> Z06110 DATA 118,32,114,116,162,0,206 
‚90,118,.169,3,141,93,118,169,106,141,95, 

118 

{bb> 20170 DATA 141,1,218,169,9,141,0,21 

0,169,8,141,96,118,141,94,118,173,82,118 
„197 

<£bL> Z81I8 DaTa 287,240,14,56,229,207,24 
‚105,7,168,185,113,118,72,76,94,114,56,2 

33,7 

<EJ> Z0140 DATA 168,185,105,110,72,173,7 

8,118,141,80,118,173,79,118,141,01,118,1 

69,0 

<DC) ZO160 DATA 141,97,118,177,77,118,20 

1,4,200,10,162,1,142,98,118,206,868, 118,1 

6,20 

<u0> z0160 DATA 2081,5,208,11,162,255,142 
‚920,118,258,68,1108,76,148,114,162,0,142, 

8 

PM) 201708 DATA 118,160,0,145,203,173,79 
„A1l8,13I,205,173,79,118,137,206,164,145, 

205 


Ram GAMES P 


SELECT LEY 


THEN PRES> 


'" <nA) 20100 DATA 166,203,141,760,118,165,2 


04,141,79, 118,165, 207,141,92,118,169,90, 
i41 

{KH} 20190 DATA 83,118,177,92,118,69,1,1 
441,92,118,240,4,169,124,208,2,169,1208,14 
i 

iah) 20208 DATA 244,2,177,90,118,208,5,1 
69,2,133,207,96,1737,91,118,2098,27,160,1, 
185 


 Ae6> 28210 DATA 4,208,106,144,37,76,102,1 
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17,106,176,9,136,16,241,141,30,208,76,33 
„115 

£CF} 20220 DATa 169,168,141,1,210,169,10 
‚133,207,160,255,162,255,202,208,253,136 
‚140 

ton> 207210 DaTA 8,210,140,27,209,208,242 
‚198,207,208, 2356,168,30, 162,2955,202,208, 
25I 

‘DI 20240 DATA 136,208,240,32,115, 115,1 
73,78, 118,201,123,208,276,173,79,118,201 
‚456 

{EC} 20250 DATA 208,229,141,30,200,169,2 
37 ,137,203,169, 155,117, 204,206,89, 118,17 
2,83 

iKkG) 20260 DATA 118,169,72,145,203,192,0 
‚2008,5,169,1,133,207,96,160,2,185,174,11 
[4 

£ND> 28270 DATA 153,171,118,136,16,247,1 
5693,50,141,24,2, i69,0, 141, 41,110,172,83,1 
18 

{nG> 20288 DATA 162,255,202,208,253,32,2 
76.117, 176,208,245,169,0,141,793,118, 76,1 
05 

<cp> 20290 DATA 113,165,203,201,123,2085, 
+ 165,204, 201,156, 208,1,96,173,97, 118,24 
0,82 = 

i6G> 2821080 DATA 165,204,133,206,169, 203, 
137,205,56,232,1,176,2,198,204,157,203,1 
69,7 

<KkL> Z0I10 DATA 141,02,118,72,28,116,165 
‚263,24, 105,1,144,2,270,204,133,203, 169, 
ı1 

{pr} 26320 DATA 141,82,110,32,28,116,165 
‚203,56, 237,40,176,2,198,204,153,203,169 
‚43 

00) 20330 DATA 141,02,119,32,28,116,165 
‚207,24,105,40,144,2,230,204,1337,203,159 
‚14 

£bI> 20540 DATA 141,92,118,32,20,116,173 
‚»78.,118,133,203,173,79,110,137,204,163,0 
‚145 

{ah} 20350 DATA 203,.1737,080,118,141,78,11 
6,133,203,177,01,118,141,79,118,137,204, 
177 

{mp} ZOI68 DATA 203,56,233,8,144,7,170,1 


89,128,.119,141,82,118,169,27,145, 203,163 


‚lt 

<P0}> 20170 DATA 141,97,118,177,88,110,24 
‚109,98,118,141,098,118,169,0,141,98,118, 
96 

£HJ>5 20188 DATA 177,203,56,237,6,144,70, 
56,237,10,176,65,104,104,173,02,110, 201, 
13 

<Bt) 28190 DATA 208,5,206,80,118,208, 7,2 
01,14,208,1,2I8,88,110,177,203,56,233,8, 
144 

‘kG> 20408 DATA 7,170,189,128,118,141,02 
‚1108,169,0,145,205,169,27,145, 203,165, 28 
ni 

<BL> 20410 DATA 141,78,118,165,204,141,7 
4,118,173,10,210,141,0,210,169, 168,141, 1 
218 

{Fa> 20420 baTa 96,165,205,173,203,165,2 
06,137,204,96,1689,39,118,24,1069,84,110,7 
#,56 

<DK> 204508 DATA 237,10,144,57,104,1693,8, 
157,99, 118,224,3,208,23,172,89,118,192,6 
‚240 

<bJ> 20440 DATA 16,200,140,89,110,1693,23 
1,133,209,169,1595,137,206,169, 28,145, 205 
‚242 

{MI} 20450 DATA 224,6,240,8,169,1,141,54 
‚118,76,114,116,162,5,169,0,157,99,110,2 
82 

<DP> 20460 DATA 16,250,96,104,157.99,118 
‚162,5,160,0,169,207,133,205,169, 156,133 
‚206 

<Bb> TO470 DATA 24,189,99,1108,105,16,145 
‚205,200,202,16,245,96,72,138, 72,152, 72, 
172 

<a) ZoaBe DATA 85,118,200,192,5,200,2,1 





| 
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‚165 


50,0,140,05, 116,185, 146,118, 141,24, 208,1 
85 

“Ah} 204930 DATA 151,118,141,18,208,185,1 
56,118,141,19,2088,185,138,118,141,0,208, 
185 

“IM 20508 DATA 141,118,141,1,208,169,8, 
141,26,208,169,8,141,27,200,169,40, 141,2 
2 

<LL+ 20518 DATA 208,169,152,141,25,208,1 
41,108,212,32,37,117,104,168,104,170,104, 
5 

BJ} 20520 DAaTh 174,87,116,202,208,55,17 
4,86,118,142,87,1108,160,4,185 ,161 ,118,20 
8,8 

<KH> 208I0 DATA 199,176, 118,272,1I8,157, 
136,110,165,166,110,208,0,190,141,118,20 
2 

<MK? 208548 DATA 178,157, 141,118,176,16,2 
27,160,9,190,161,118,2408,5, 202,136, 153,1 
Bi 

<öK> 20550 DATA 118,136,16,243,174,07, 11 
5, 142,67,118,96,169,8,133,207,169, 2, i4i, 
3% 

‘<DH> 205860 DATA 110,169,160,141,1,218,16 
3,240,141,0,218,141,95,1168,173.88,118,58 
‚2ü8 

JE? 285708 DATA I,144,5,210, 207,76, 127,1 
17,165,207,192,1,208,3,24,105,5,168,163, 
Ö 

icH$ 28580 DATA 153, 1356,118,169%,120, 153, 
161,116, 141,30,208,162,1,169,2, 141,84 ,11 
0.32 

<LI? 285998 DATA 114,116,76,937,115, 72,138 
»72,152,72,169, 42,137, 208,1693,156,1343,20 
7 

CO? 20600 DATA 160,2,190,171,110,202,13 
5,153, 171,118,16,14,169,9,153,171,118,13 
6,16 

iDG+ Z0610 DATA 2I8,2I8,91,118, 76,258, 11 
7,160,2,1858,171,110,24,1058,16, 145, 208,13 
6,18 

HK} 28620 DATA 245,169,50,141,24,2,104, 
168,104,179,104,96,173,9393,118,201,0, 248, 
59 

‘BF> 20630 DATA 201,2,240,64,174,96,11B, 
282,142,96, 116,206, 76,174,94,119,142, 96, 
110 

“aH> 20640 DATA 173,97,119,201,1,240,17, 
174,35,118,224,96, 240,56 ,202,142,95,118, 
142 

‘ikA} 20658 DATA 1,210,78,76,118,174,95,1 
18,224,10,208,0,169,0,141,1,210,76,76,11 
B 

<PI} 206606 DATA 2352,142,95,118,142,1, 210 
‚76, 76,118,177, 95,118, 2081,0,248,14,56, 23 
4,4 

‘BE? 206708 DATA 141,95, 1108, 141,0,2109,169 
‚168,141,1,210,968,0,123,156,1237,156,, 137,9 
‚8,4 

“JP> 206806 DATA I0,30,254,7,0,0,0,0,0 
9,0,0,0,0,0,0,0,0,6,0,0,0,6,08,7,7,8,3 
8,11 

“EF> 20695 DATA 10,0,0,0,12,13,0,0,15, 14 
»757;11,11,13,14,14,13,40,50,560,70,80,10 
o 

CA)? 207808 DATA 118,120,170,140,160, 162, 
164,166,168,54,182,248,128,150,22,772,166 
‚242 

<DH> 207108 DATA 12,0,0,0,0,0,0,0,8,0,0,1i 
+2,0;1;,2,8 

<PI> 20999 REM ### Daten fuer Player His 
“HP? 21000 DATA 66,36,76,126,255, 231,157 
‚423 

{LJ> Z1010 DATA 74,126,255,189,27219,126,3 
6,2193 

BM} 21020 DATA 124,254,186,106,254,254, 
254,178 

“oM> 21038 DATA 16,90,36,24,24,90,1685,12 
E 

<JF> 210408 DAaTı 656,1685,66,90,126,1894,165 
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OM} 21650 DATA 126,219, 255,153,165, 165, 
153,66 

{HF} Z1860 DATA 126,219,255, 171,217, 126, 
56,102 | 

<cP} Z1870 DATA 278,186, 278,16,16,16,68, 
56 

<IH? 210890 DATA 195,271,255,219,90,126,73 
4,24 “ 

<PE? 21098 DATA 129,219, 255,90, 126,266, 1 
5,126 

<GP}> I1128 BbaTı 1 

<Ib> I1999 REH MH FTeichensatzdsaten we 
‘<CI> 22008 DATA 64,213, 127,125, 119, 119,1 
19,119, 119,65,87,252,126,22 1,221, 221,221 
Ft 

‘<CP}> I2018 DATA 66,86,255,05, 255, 255,255 
»255, 255,67, 119, 119,119, 119,119,119, 119, 
4119 

NE? 32020 DATA 68,221,221,221,221,221,2 
21,221,221,693,2565, 255,258 ,255, 255,85, 255 
‚85 

iCF} 32856 DATA 70,119, 119,119, 119, 11%, i 
25, 127,213,71,221,22 1,221, 221, 221,125,25 
2,87 

“IP> 32048 DATA 72,259,255, 255,255, 255,2 
55,255,255,1,0,0,0,48,48,0,0,0,2,21,85,8 
Ei 

<of> 32050 DATA 80,80,24,85,21,3,04,03,.2 
1,5,5,21,85,84,4,65,65,65,65,65,85,85,20 
+5 

AI} I2060 DATA 20,895,85,65,65,65,65,65, 
6,0,0,0,170,170,0,0,0,7,12,12,32,32,52,3 
2,32 

{KD> 32070 DATA I2,8,72,77,172,160,168,0, 
”,0,9,0,0,0,160,166,532,32,52,16,0,8,0,42 
‚a2 

<J4> 32088 DATA 32,32,32,11.,32,32,32,42, 
42,0,8,0,12,72,32,27,160,160,0,0,0,13,@0, 
0,0 

<Lb> Z2090 DATA 1698, 160,72,72,32,14,0,0, 
0,42,42,32,32,32,15,72,32,32,42,42,0,60,8 
‚27 

iaJ> 321080 DATA 20,85,05,83,05,95,85,20, 
20,250,234,215,2I5 ,213, 219,217, 2435,29,0, 
252 

<6b> I2110 DATA 255,207,255,243,63,207,3 
0,252,241,63,253,207,252,63,0,32,257,255 
‚238 

Far I2120 DATA 255,255,255,251,251,-i 
calL> 2700 DATA 171,171,187,187,87,87 ,1i 
9,119 ,171,171,187,175,95,119,87,87, 171,1 
Fi 

<bJ> 322106 DaTA 191,191,127,127,87,87,17 
5, 171,187,187,113, 119,87 ,935,171, 171,131, 
i75 

CJ> 32220 DAaTa 95,127,87,087, 171, 171,191 
‚175,35,127,127,127,171,171,1931, 191,113, 
119 

GL} 32250 DATA 87,087,187,187,187,171,87 
113, 119,1193,259, 2393, 259, 259,223, 223,227 
and 

GH} Z2240 DATA 251,251,251,251,119,119, 
87,87,187,187,187,175,935, 119,119, 119,191 
Pe 

«HL? 32250 DATA 191,191,127.127,87,87,18 
7,171,187,187, 119, 119,119, 119, 191,175,198 
T 

GP} I22608 DATA 187,119,119,119,119,171, 
171,187,187,119,119,67,87,171, 171, 187,17 
1,87 

DK} 32270 DATA 127, 127,127, 171, 171,187, 
4187,119,87,95, 243,171, 171,187 ,171,87, 95, 
4113 

{FK> 322780 DATA 119, 171,171, 191,171,87,2 
47,87,87,171,171,259, 239,227 ,223, 223,223 
‚187 

‘<GK? 32290 DATA 187,197, 187,119, 119,087,0 
7,187,187,187, 1087, 119,87,087,223,167,187, 
157 

‘BB> 372300 BATA 187,119, 119,07,119,1807,1 
87,187,259,225,119, 119,119, 187,187 ,187 ,1 


Homecomputer 27 





I 71 ‚Ari 


| 
£cF> 312310 DaTa 87,223, 221,223, 171,171,2 {NC> I7I40 DATA. 191,191,87,247,87,87,171 
51,171,87,127,687,67,171,171,187,1867,119, | „A71,491,171,87,119,67,87,171,171,251,25 
119 | i 
£pk> 12120 DaTa 87,87,239,1793,175,233,22 | {HH} 12350 DATA 247,247,247,247,171,171, 
2,223,223,223,171,171,251,171,87,127,07, | 187,.171,07,119,87,87,171,171,187,171,87, 
oF 747,87,87 
<GE) 32II0 baTa 171,171,251,239,215,247, | {JM> 12700 DATA 20,685,85,85,85,05,85,2780 








87,87,191,1087,107,171,87,247,247,247 ,171 












Eingabehinweise IB REM GRAFHIC B+1& DRUCKERAUSGABE FUER 

20 REM ATARI COMPUTER MIT FX/RX-88 DRUCKER 

38 REM {tC) 5.1985 BY MICHAEL SASSIN 

48 REM AUF DEM KAMPF 1B 5153 LANGERWEHE MERODE 

0 C=B 

&0 FOR X=1536 TOD 1717 

79 READ A:C=sC+4A:POKE X,A:NEXT % 

90 IF C{>?23431 THEN ? "DATENFEHLER":END 

98 ? "OK"rEND 
180 DATA 104,169,128,133,218,165,88,1535,212,155, 214,165,89 
i1@ DATA 133,213,133,215,169,25,155,217,178, ‚217, 249,102,32 
128 DATA 144,6, 189, 41,133,218,198, 218, 240,71,160, 0,162 

138 DATA 8,177 '214,37,216,201, 1; 38, 217,24,165,214,185 

148 DATA 10, 133, 214,165,215,185,0,155, >15, 232,224,8,144 
158 DATA 230, 165 ‚219,32,160,6,165,212,133,214,165, 213,155 
150 DATA 215,70,215,144,2089,169,128 „133,216, 24,165, 212,185 | 
178 DATA 1 .133,212,133,214,165,213,105,0,133,213,133,215 
IBB DATA 76,32,6,24,165,212,185,24,133,212,133, 214,165 
196 DATA 213,185,1,133,213,133,215,76,21,6,169,80,133 
208 DATA 217,198,217,240,8,169,0,32,160,6,75,131,8 

218 DATA 96,158,9,152,72,185,172,6,32,16B,6,194,158 

2?@ DATA 136,208, 243,75,170,173,55,228,72,173,54,228,72 
238 DATA 138,162,0,96,1,64,4,42,27,10,8,65,27 


Der erste Schritt ist die Eingabe 
des Hauptprogramms. Am be- 
sten speichern $ie das fertige 
BASIC Programm auf den vor- 
handenen Datenträger. Nach 
dem Starten des Programms 
werden die Daten des Maschi- 
nenprogramms in den 
geschützten Bereich der "FAGE 
SIX’ gelesen, die bei 1536 be- 
einnt. Isı das Programm ord- | 
nungsgemäß eingegeben wor- 
den, meldet es sich mit 'OK”, 
Das BASIC-Programm kann ge- 
löscht werden, wenn die Daten 
richtig eingelesen wurden. 
Wenn nun die Grafikstufe 3-+16 
im Programm benutzt wird, 
kann durch den Befehl 'k= 
USRi1536) der gesamte Bild- 
schirminhalt auf den. Drucker 
gebracht werden. Dazu werden 
nur 48 see. benötigt. Das Demo- 
programm zeigt in Kürze die a a EEE ESRHHNEN 1 
Anwendung der Maschinenrou- I SU h I # 
line. | RR N . 
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18 GRAFHICS B8r15:COLOR 4 
2@ FOR X=B TO 3197 STEF 3 
30 PLOT 9,8:DRAWTO X,191: 
PLOT 3197,171:DRAWTO 317-%,8 
40 NEXT X iM 
Sa X=USR(15356) I, 
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Beileibe nicht! Kurz, 

aber „oho* möchte man da sagen. Denn 
-TICO-TICO" hat es in sich. Der erfahre- 
ne Programmierer weiß, daß ın der Kürze 
oftmals die Würze liegt Nicht nur, daß 


solch ein Listing schneller abgetippt ist, 


sondern es enthält für den lernwilligen 
Computerfan unter Umständen eine 





für (ATARI-)Musikfans! 


nur ein kleines Sounddemo? 


Reihe von interessanten, neuen Erkennt- 
nissen, die man dann sehr gut auch inei- 
genen Programmen verwenden kann. 
Oder haben Sıe gewußt, wie man aufdem 


| ATARI 800 Sound mit Echoellekten er- 


zeugen kann? „TICO-TIEO® zeigt Ihnen 
wie das geht. Und wie in der Realität, in 
der mancher Sänger mittels Technik die 


Qualität seiner Stimme verbessern kann, 
so klingt auch die ATARI-Stimme plötz- 
lıch gar nicht mehr so dürftig. Die. Be- 
eleitinstrumenie steuern noch einen flot- 
ten Rocksound bei, daß man fast verleitet 
ist, eine flotte Sohle aufs Parkett zu legen, 


Ein Beitrag von Timor Bors 











L2:HTISHT 
“HMI? 59 FOR H=1 TO Z:HEHT W:S50OUHD 2,0,0, 
It) 










as Listing 











‘o0> 1 REM 22 TIcOh - TICO KHUZIEK DEFHO {PG} 608 FOR Isis TO 6 STEP -4t:50UNDb B,T, 
‘cf Z SETCOLOR 2,0,0:7 "AR; POKE 752,1 AD, L:SOUMD i,HT1L,12,LiL=ZL=-iL}+ IH: LZ=SL2=B. 
An 3 POSITION 10,10:7 " COPYRIGHT BY T 2#CcL2>09:50UND T,HHT,LO,L2:MEHT I 
‚80% <A0> 62 IF PEEKESIZFIISE THEN Rükn 
4 POSITION 5,2:7 u ‘DE? 65 SOUND 2,0,0,0 


“AG? 80 GOTO 50 





i Fe “+ OO 
 BIM RT5C493 :603U8 10000 












GC} 200 SOUND 3,0,0,0 
iFK> 17 RTECIT LFI SU ee) “GL? 210 REM ee 
u ‘0J> ZZ0 FOR I-e To T:50URb 1,0,9,08:MEAT 
DE} 18 RTSCA7T,LFHLSISH ER CE aa T 
{GP} 19 RTGELIE,ITH1SIZ" CHE rlaataall27 kl" IK> 270 RUN 
<FK> 20 RCcH=SIT:Ac=Si16 ‘“Eb> 500 GATA 0,0,0,0,0,0,0,0,0,0,0,0,0, 
‘It? 25 RESTORE 0,0,0 
{EK} Z0 C-is <EE? 510 DATA 8,0,0,0,0,0,0,0,0,0,0,0,60, 
{ME> 50 CSC+H1:POKE 712,C:POKE 77,0:IF C= 0,0,0 
REM THEM C=S1:POKE 53273, 0:RCH=1?7 “EF> 520 DATA 0,0,0,0,0,8,0,0,0,0,0,0,0, | 
£JF> SL IF ASCERTSCE,CHIC5D THEN SOUND 2 0,0,0 | 
„ASCERTSCC,CIHI ‚8,18 “AaP) SZB DaTan 0,0,0,0,0,0,6,8,0,0,0,0,8, | 
<HI> 52 ATZT:iREAD T,HTLIF T=-1 THEN 200 0,256,0,0 
kJ} 53 IF T=256 THEN READ T:C=3Z:iRcH=49 ‘HH> 540 DATA 0,0,0,90,0,0,0,0,0,0,0,0,0, 
<EJ> Sb IF Aatk)e THEN L2S6:HHTZATr 0,00,0 
£MI> 57 IF T=256 THEN READ T Pb} 558 DATA 0,8,0,0,08,08,0,8,0,0,47,0,5 
HK? 58 SOUND 0,T,10,10:IF HT(?O THEM L= 1,0,47,0 
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GP} 555 REM EEE FH He 
“an 

{HA>  S60 DATA 45,116,47,0,0,0,35,0,0,152 
‚47,0,506,0,47,0 

{EI} 578 DATA 45,152,47,8,0,0,37,80,8,67, 
47,0,50,0,47,0 

<LJ> 580 DATA 45,152,47,0,26,0,11,0,37,6 
7,47,0,53,0,57,0 

{PTI> 530 DAaTä 60,116,0,0,0,0,0,0,0,152,3 
>,6,37,0,40,0 

‚GPp> 600 DbaTa 45, 176,195,0,0,0,26,0,0,116 
»23,0,35,0,45,8 

‘DB} 610 DATA 47,115,375,8,0,0,29,0,0,152Z 
‚29,0,71,0,256,0,33 

£CH> 615 REM eb 
“u 

HI} 670 DATA 71,67,64,0,50,0,42,0,35,67 
‚23,0,31,0,35,0 

GP) 630 DATA 37,152,23,0,0,0,31,0,27,67 
‚47,0,50,0,47,0 

£GP> 648 DATA 45,116,47,0,0,0,35,0,0,152 
‚47,0,50,0,47,0 

{EN> 650 DATA 45,152,47,0,0,0,37,0,0,67, 
47,0,50,0,47,0 

{LI 660 DATA 45,152,47,0,26,0,31,0,37,6 
7,47,0,53,0,57,0 

<PH> 670 DATA 60,1156,0,0,0,0,0,0,0,152,13 
5,0,27,8,40,0 

HH) 680 DATA 45,176,75,0,0,0,26,0,0,1i6 
»23,0,35,8,45,0 

<£bJ> 690 DATA 47,116,39,0,0,0,29,0,0,152 
,29,0,21,0,256,0,3J3 

ixb> 700 DATA 31,152,47,0,37,0,31,0,23,6 
7,26,08,29,08,31,;,8 

<CG> 7108 baTa 35,116,0,146,0,152,8, 200,0 
‚220,31,0,35,0,37,0 

{GM 713 REH PAFRETE TEE EEE 5 Eu 5 2.0 00 0000000000202 202 
He 

{HH> 720 baTa 40,200,60,0,47,0,40,0,60,1 
78,47,0,40,0,27,8 

<pI> 730 DATA 35,128,0,0,45,0,0,0,0,176, 
31,0,35,0,37,0 

20A> Fdo DATA 40,128,64,0,57,0,45,0,64,1 
76,53,0,45,0,40,0 

{HA> 745 REN Be 
CE 

<DL>- 750 bATA 395,200,0,0,47,0,0,0,0,128, 
23,06,29,0,29,0 

{Mo} 768 DATA 293,260,71,0,31,0,31,0,31,1 
58,35,0,35,60,35,8 

{MG> 770 DATA F1,176,45,0,45,0,45,0,45,1 
16,31,0,31,0,31,0 

{HG} 780 DATA F1,128,35,0,135,08,35,0,35,1 
76,40,0,40,0,40,0 

<PF> 7390 DATA 40,128,0,0,0,0,0,0,0,200,3 
1.0,35,0,37,0 

{ML> 500 DATA 40,200,60,0,47,0,48,0,60,1 
78,47,0,40,0,27,0 

£DH> 810 DATA I5,128,0,0,45,0,0,0,0,176, 
+1,0,35,0,37,0 

{MP} 020 DATA 40,128,64,0,53,0,45,0,64,1 
76,57,0,45,0,40,8 

<C0> 830 DATA 75,200,0,0,47,0,0,0,0,128, 
273,0,21,06,33,0 

EHK> 840 DATA 35,146, 37,0,75,0,31,0, 26,1 
40,29,0,31;,0,29,0 

<JG> 8508 DATha 27,1278,40,0,29,0,237,0,197,1 
16,21,0,22,0,256,0,23 

eos> 860 DATA 26,176,29,0,31,0,35,0, 40,1 
16,45,0,47,0,53,0 

<If> 870 DATA 60,200,47,0,0,0,408,0,2%,0, 
0,0,0,0,0,0 

£HA> 220 TEN 
we 

<L6> 890 DATA 35,116,72,0,57,0,437,0,0,15 
#,72,0,57,0,47,0 

{KH} 900 DATA 42,116,72,0,57,0,47,0,0,15 
7,72,0,57,0,47,0 

£K0O> 910 DATA 42,116,72,0,57,0,47,0,0,15 
7,72,0,57,0,47,0 

si+ 970 RER ee 
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<AL> 970 DATA 42,152,64,06,57,08,47,0,08,67 
‚53,06,47,0,42,0 

nö 9ao DATA 35,152,53,0,47,0;,37,9,0,67 
‚537,0,47,0,42,0 

HN) 958 DATA 42,157,64,06,97,0,47,0,0,67 
‚57,90,47,0,42,0 

<Iä? 960 DATA 35,152,52,0,47,0,37,0,0,67 
‚53,9,47,0,42,8 

‘LE? 970 DATA 42,116, 72,0,57,0,47,0,8,15 
2,72,8,57,0,47,0 

<LG6> 980 baTA 15,;116,.72,0,57,0,77,0,0,15 
2,72,0,57,0,47,0 

LG} 390 DATA 42,116, 72,0,57,0,47,0,0,15 
2,72,0,57,0,47,0 

HP} 1000 DATA 42,140,47,0,57,0.68,0 
<öE> 1005 DATA 42,140,47,0,97,0,68,0 
<DI> 1010 DATA B4,67,68,0,64,0,57,0,53,1 
40,0,0,0,0,0,0 

<In> 1020 DATA 108,67,114,0,100,0,96,0,8 
5,176,76,0,72,0,64,0 

<Aal> 100 DATA 57,116,57,0,50,0,47,0,42, 
146,47,0,52,0,57,0 

<H06> LO4d DATA 64,567,72,0,76.0,85,0,96,1 
57,108,0,114,0,128,0 

HC? 1045 DAaTa 144,116,114,0,0,0,96,0,72 
‚0,47,0,50,0,47.0 

&JL> 1050 DATA 45,116,47,0,0,0,35,0,0,1%5 
2,47,0,50,8,47,0 

<Hb> 1060 DATA 45,152,47,0,0,0,37,0,8,67 
‚47,0,50,0,47,0 

<DE> 1070 DaTa 45,152,47,0,26,0,31,0,37, 
67,47,0,53,0,57,8 

<Cb> 1080 DATA 60,116,8,0,0,0,0,0,0,152, 
35,0,37,0,40,0 

<KD>+ i090 DAaTa 45,176,55,0,0,0,26,0,0,11 
6,29,0,35,0,45,0 

{FH} 1100 DATA 47,116,35,0,08,0,292,08,0,15 
7,29,0,31;,0,256,0,33 

£KD> 1110 DATA 71,67,64,0,50,0,42,0,.35,%6 
7,29,0,31:0,35,0 

< IK) ilz208 DATA 37,152,27,0,0,0;,21,8,2T,6 
7,47,0,50,06,47,0 

{JE 11350 DATA 45,116,47,0,0,0,35,0,0,15 
2,47,0,50,0,47,B 

{HC 1140 DATA 45,152,47,0,0,0,37,8,08,;,67 
:47,0,508,0,47,0 

<0Ob> 1150 DATA 45,152,47,0,26,0,31,0,37, 
67,47,09,53,0,57,0 

icc> 1160 BATA 560,116,0,0,0,0,8,0,0,132, 
35,0,77,0,40,0 

iKk6> 1165 DATA 45,176,35,0,0,0,26,0,0,11 
6,29,0,33,0,45,0 

Gb? 1170 DATA 47,116,75,8,0,0,29,0,0,15 
2,29,0,31,0,256,0,33 

£MG> 1100 DATA 31,152,47,0,37,0,31,0,23, 
67,26,0,29,0,31,0 

£3J> 14190 DATA 39,116,0,146,0,152,0,208, 
0,230,0,0,0,6,0,0,-1,0 

£Ca> I0060 RTF=Z'eVretaataataataerte": RETURN 





An alle Programmautoren! 


Wir suchen weitere Beiträge — Tips u. 
Tricks, kurze Anwendungsprogramme, | 
Textbeiträge etc, — für die HOME- 
COMPUTER-ATARI-CORNER. 


Der Tronic-Verlag zahlt eın Honorar 
von 120,- DM pro veröffentlichte kom- 
plette Seite, Ihre Beiträge senden Sie 
bitte an: 

Tronic Verlag, Postfach 870, 

3440 Eschwege 
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Sie sind Herr über eine alte Seefahrerfestung in der Südsee und sollen dort den Seeweg 
kontrollieren. 


Tolle Grafik 
herrliche Animation! 
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Spielbeschreibung 


Anlhrer Festung beabsichtigt eine ganze 
Flotte feindlicher Schille vorbeizufäh- 
ren. Mit 2 leistungsstarken, drehbaren 
Geschützen sollen Sie diese versenken. | 
Das 2. Geschütz wird übrigens von einem 
Mitspieler gesteuert, mit dem sie um die [g}\ 
Anzahl versenkter Schiffe konkurrieren. 9% 
| Die beiden Geschütze werden mit Jov- 3 
stick an Port l und 2 gesteuert. Rechts? 
Links-Bewegungen steuern die Schuß- 


j re en 
$ Hl | 

Me ii ehe Pr 
Sn E 5E 


[22 or 1, 





' richtung und die Stellung des Joysticks | 
 (vorne/Mlilte/hinten) bestimmt die 
Schußstärke und damit also die Reich- 
weite. Wenn esauch zum Spielablaufkei- a Ä : zen ne 
ner weiteren Worte bedarf, so soll hier 2 — a 
noch einmal auf die exzellente Grafik Unterschätzen Sie Ihre Spielaufgabe nicht. Ihre Seefahrerfestung wird von wesentlich 
hingewiesen werden. Schon die Titelera- gefährlicheren Schiffen bedroht! 
ik kann mit kommerzieller Software 
leicht konkurrieren. Ein herrlich gestalte- r 
tes Pergeamenidokument erscheint, auf | Schiff wird variiert. Übrigens; je genauer 
das mit einer Schreibfeder der Titeltext | ein Schill getroffen wird, desto weniger 
gezeichnet wird. Mit einem kräftigen Ge- | Treffer sind erforderlich, um es zum Sin- 
räusch wird schließlich noch ein dicker | ken zu bringen. 
Siegelstempel aufgetragen. Drücken Sie | Nach Ablaufides Spieles wird die fünistel- 
jetzt die Taste RESTORE, werden Sie | lige Rangliste angezeigt, Mit SHIFT/ 
aufgefordert, die Namen der Spieler | CLR kann sie wieder gelöscht werden. 
(oder den deseinen Spielersjeinzugeben. 
Wenn Sie nun mitRETURN abschließen. 
beginnt das Spiel, das’jederzeit mit RE- 
STORE abgebrochen werden kann. \ Das Listing besteht aus 4 Teilen und einem 
Die mit der Taste "/" eingestellle Spiel- | Forprogramm. Zuerst muß das Vorpre- | Zeile 200 des #. Teils muß noch die Ladea- 
stufe bestimmt die Stabilität der Schiffe, | gramm eingereben und gestarteı werden, Es | dresse des Diskertenlaufwerks eingetragen 
d.h. die notwendige Trefferzahl pro | speichertsichvon selbst ab. Nunmüssen der. | werden. 





| Reihenach dieL, istings I=-F eingegeben nd 








abgespeichert werden. Dann die Teile 1-4 
einzeln laden und starten (bei Teil I dauert 
es etwas länger). 

Nach Programmdurchlauf des 4. Teils ge- 
ben Sie bitte ein: RUN IWW 

Das Programm wird dann in der Spielver- 
Ssionabeespeichert, Benurzen Sieein Diskel- 
 tenlaufwerk, mußt die Zeile 130 im Vorpro- 
gramm entsprechend geändert werden 
(LOAD "DIE FESTUNG SD. Auch in der 
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a £227 3 255,244 251,259, 208, 249 ,85,68,89,1,89 “213> 
Ta a Er EAN EEE : | 1110 DATABT.BS, 157,170, 170, 105, 102,102,1 
1: gen > DIE FESTUNG € LOADER Seat 64,170, 170,164, 170, 170,144, 44, ee 2207 : 
x 1120 DATA 1,15, 4,5, 115,16, 294 + 
> Se (C) 1986 T-LANARI 22083 er a lorser iss, ee PER 
SEE EN, RER 136. DAT. 15,,125,71,21,118, 71 106,1 
100 FORA= 739107671 RERDB: FOKER, B:NEXT:BDS= eig 1.154.85.1,170,170,1 . <> DE; . 
, EHREISA)ECH-CHRELIS) Se 1140 DATA1LAF, 153, ,106,170,,26, 170 Bis | u 
i Br : an Te ni in 5 i " Ei # .. # ... ja 
110 ER LEE et Er Be 1150. DATALF nn AOS 5A EIER A 115 = | 
ENTE TE CE DESANREC(HIDE RK 33- ‚235,70,125,255,70,253,235,71,253,259 5 “27, 5 
La i | . ENT . 120: DATA71 , 253, 235,95, 293,253, 127,25 = 
A,1} NEXT: POKET7O, En, En el Bares age Ta 238 BE BR 1000 AP = 
u a Lh119Y584750  <139 ki7O DATALGP 101,109 ,133, 170,370, 189,153 u 
© 10 DATAS2,BS.228,160,32,109,194,2,32,21 | ESS LER nLED LIU ER TRUE NEL sa ar 
0,255,136,16,297,169,13, 141,119, 2,141 <145> KEN FORTAN ED IE na ara? 52 
+ 3 ? Athen r oe | ATA4H544 1120 Flle ' Br. 
150: DATA120,2,169,2,133,198,75,131,154 <112> end lad EIER EN Dre HR Den BEST Bet er 
| | ken Kent, I, Kumeie rfchande Kan De 5,,31,71,,31,95,,127,95,,127,975,. 1,258 ; 207 > = 
1200. DATA71,1,251,975, 7,247, 127, 74217, 127 i Bas 
=1,.89,127,101,24,73,25,104,155,4, 145 <a 1 Er | 
IHREM a, 2773 Be a Be TB rer Ä ie 
' 06,1 | ‚169,154, ,106,17 a 
© | 11 REN > DIE FESTWG < TEILE <AT} ee li En 
[2 REN 1955 TER, | a gan Il 4 
| Seen 1270 DATABO, ,1100,,.180,,,148,1,,189,4,8 na Kir 
der en En 54,105,148,26, 157, 144,89, 153,149, 170 | >r# 
EN en ee 1240 DATA169,154,170,164,170,169,164, 153 u 
u in - - 154,1944,170,170,54, 170, 155, un # 1 73 u 
D , 110 PRINT" CLEAR} "POKESE, 68:1 POKE! : ee | ae "= 
' 120 PRINTTAB(ZSSISPC (2311 "MHITEIBITTER 7412749544121,31,,25,29,,25,74,25,207 6442 a 
Ye JEINIGE ESPAC SLITENTER ERS EENE NT 1260 DATAZ1,25,5,108,89,1,22,157,65,1,15 u 
en BoarE iur) 4,149,1,170,170, ,105, 153,126, 1701444 “1a2> B: 
| FACE} E WERT et >70 a 190 144, ,,148,#,,1 a 4 
130 FORI=47FTO7O1:READA:FOKEI „ArNEXT:EYS DER Tan al TA DO TSBEHIE er2> 2 
re re 0,144,25,169,144,26,153,144,26,169,148 <922 zZ 
| 14, nanE „. 7 ee 1270- DATAIOS , 154, 150,156, 100,170,170 , 164 2 _ 
re STO7r:READGITI,H ur „133,154 ,1684, 170,170, 144 ann 355 
140 READB: IFB=-ITHENG=0:B0T0150 <B> vr Deifsusisessnusasannuenn san Zen sat u a 
| De Fa ae EEE Söhnen area Es “ r| 
7 105,153,,24,154,. alar +4 
175 REM GRAPHIK SPIEGELN 1245 1320 Dad... Eur are 4 
ir 3 ra 15 TIER TEREETT BIEREITI ENTE rw za 
Ira: Tr j Er 115,12,1,144,,1,164,.21,164,,106,164, 4233 > ne 
erde einen = 1330 DATALOL,154,,147, 154,4, 153,169,87,1 zo 
er N 'EFO | a 59,85,1659,064, 170, 154,166, 154, 164,153 “17u> A ze 
190 FORD=OTOF:FORE=0T045TEP2: FORF=OTOL 1275 1340 T DATAlss, 144, 103,170, 68 nd £i74> ı\ E) 
200. IFIPEEK 128928 +A+B HH DI ANDIG TE+FI I Je 1345 REM KUGEL <iä7> = 
THENNEXTF ‚ED, 6,5, A: G0T0220 a9 1350. DATAZA1 DE, yuysynasnnnn 20H 10H, 
re ee ur 170,69, 1,105,54,5,250,144,5,234, 194 ,& <I1B> ru 
+Fh)8 ‚E,D,C,B, « 13450 DATAL7O,144,5,170,144,1, 170, 54,1,17 en 
220 FORA=OTOSAOSTEPI2B:FORBSOTOGASTEPS4  X175) Re N eu 
230. FORCSOTOGOSTEPS:FORDEOTO2: FORE=OTOAS 1370 DATA aaa sans 2er 108 = 
TEFZAFORFSOTGN 12723 74.144,1,190,144,1,185,144,1,170, 144,1 1495 u 
240 IF IPEER (257 HAB DI AND IG EHI I = 1380 DATAL7O,144, 105,54 2 dasanarn na ee 
THENNEXTF „E,D,C,B,A: GOTOZ&0 une san a rt ent > 
PE0 PFOEKERTA42A+A4C-D-B,PEEK {234 24+A+C=D=B 1370 DATA, as ana HH HE 
IDORCHTE+FII ENEXTF ,„E,D,C,B,A 1705 10,144,,106,144,,108,144,,104,144,,2& <B4> 
260 FORBSOTDLSBSSTEPrSS: FORCES OTD4ESTEPB: FO TOO DT en ee 
RD=0T07: FORE=OTDSSTEFZ: FORF=OTO1 “sl 1410 DATA, HH Ha Hana db, 
zu IF (PEEK (36854+B+C+b) AND (G IE+FI ) 1 =OTH 26,199, 25, 145, lan nn a0 
ENNEXTF „E,D,C,B:6070290 2. 186? DO There <B0> 
290 POKE21392+D+4B=-C,FEEK (21392+D+B-C) OR t ee ee tn 
HIE+F}J SNEXTF,E,D,E,B 118? TE a 323 - 
20. FORB=0T01F25TEP544: FORG=-OTOSASTEFB: FO [440 DATA, -120> Fa, 
Rl=öT07: FORE=-ÖöTOS5STEFZ: FÜRF=OTOI | 623 1445 REM FEDER et Ben 
300 IFPEEK (210B8+B+C+DI AND G (EHI I I=OTH 1450 DATAya ara TR, ee 
ERNEXTF,E,D,C,BiEND +78, ‚169, ,26,164,,70,159,1,154, 148, 1,170 “11&> 
510 POKEZLAPR4+D+8-T ,PEEK (1a 24+0+B-CIO0Ri > 1460 DATA1A4,1,170,144,5,155,64,5, 170,49 Ba 
HIE+F} IT NEXTF,E,D,C,B:END E93 6, 169,426, 00.20 lb lbanananen <35 > 
LO0T : ee 1445 REM KL. KAMDNEN Frih 
io02 REH GAAFHIE “1353 14706 DATA, 4 +5,05. 04,25,170,159, 1095, 170,1 
1005 ı AO, 69,25,149,94,21,105,54,1054,170,54, 1065 <2i1> 
1005 REM SCHIFFE 240; 20 DATALTO, 54,102, 155,44,25, nn 
1010 DATAZZSTZ ann una ln nn band, EA Seine 205> 
81,,127,295,,.127,209, ‚51,219, ,91,215, EP; 1490 DATA,,121,89,80, 106,170, 164, 105,170 
io20 DATAG,247,,6,01,,06,69,21, 144,54, 10 ,105,21,88,14&4,1,169,84,1,170, 169, i, 170 21025 - 
4,170,80,22,194,1565,1,170,170, 1,169 <115> 1500 DATAI6F,1,194,153,,101,100, ‚100,100 < 
1050 DATALS3,,106,170, 1,26, 170 “165? ELITE FESTEISEEEETERTERTEERERERERT 1l22r =. 
1040. DATALb.. 100,4 1,249,.,,235,69,,255, 0 1505 REM PALMENSTAEMME <161> 
255, 7,211,68,,229,25,,255,125,59,255 89} 1510 DATAS,170,,6,170,,6,158,;,22,164,,25 
1050 DATA2FS 200 253,25, 27, ‚154,.70,144,,170,80,,170,54,,170,44, nF 
11.91,212,101,25,105,100,25,1597,101,105 <83> 1520 DATA170,54,,170,64,,.170,54,,159,54, = 
1050 DBATA1LS3,170,170,159,153,154,164,170 A rn ea Je) — 
‚170,144,170,169,64s 11» F <239> 1530 DATAyaınn 2423 NAEE 
1070 DT rer ar ra 1540 DATA, sauna OA, „1 a u 
,125:.,1,285, 75247 0,51,215,,127,225,1 <192> 0,144,,10,154,,10,164,,6,159,,1,189,,1 <216> re 
1080 DATALZF,85,,70,170, ,5,102, 3,105, 1,2 1550 DATALSF 02,159, 11,170, 11108, 10, um 
LTE <131> EU» Eee En Perg +195> 2 er 
1090 DATAd, 44254 45274,64,427,208,,123,298 1535 REM SIEGEL *B2> = 
„„127,221,,251,125,,121,255,64,251,255 <240> 1560 Te ind eb ABB EIBFAN En 10% = 
1100 LEE rmt® 259,208 ,281,255. 208, ah en = - 5 n Tee es en 
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‚54,25,165,64,25,170,48 ‚25,166, 44,25 
1570 DATAIOA,S4, r ‚89, ,6,189, ,1. 1657,54,,97 
S.64,,31,208, „31,206, 431,244,,7.125,,7 
ı 580 DATAgd,,7,54,,1,200,,,5*, 

1585 REM HAUERTEILE 
1770 DATA, ss ee ne 
141495, 1, 15, 1, bh, 1b 
1600 DATABS, „166,101, ‚85,105, ,170,105,,1 
70,106, ,170, 

1410 DATAnnasa era re 
41:85, ,95,154,,154,154,,154,154,,154 
1520. DATA154, „147,85, ,89,170,,169,170,,1 
569,170,,169, 

1525 REM IHR 
1630 DATAeaarererrrHr Tre nn 
sertsseserne nen 1 70,170,170,170,170 
1540. DATAL7O,170,170,170,170,170, 170,170 
‚170,170, 

1550 LE PER EU EERSUERTEEREREEREN) 
Pe a Er aa] 
1550 DATA170,,170,170,,170,170, 5 
1570 DATA, una nae RT ETF ER ETT 
re On 70707 
1580 DATA, ,1FOyag rl 
4005 REM KANDNE 
4010 DATAZBT Fb, san nn 
‚2,10,45,189, 189,253, 233,253,253, 160 
4020 DATA120,125,128,127, 127,127, 127, 444 
‚128,128, 128,128, 4sor nennen nenn nn 
2050 DATA, aa HH 2 
4,173,1897, 189, 253, 253,253,173, 171,122 
4040 DATALZA, 126.127, 127, 127, 128.128, 129 

‚128, 128, a TB DA 
AO DATA an I 
3,233,250,234,.173,189, 189, 255,127,127 
4050. DATA17S,171,122,175,126,127,128,128 
‚129,128,120,120,128, 120, gaseH nes HI H 
ulirge DATA anna ref 
7,47,191,191,191,191, 158,94, 99,99, 73,79 
40gu DATAFS,95,,,128,128,724 224,224 ,224 
EEEREREERELEEHTERLEREERLERERLELEREREE 
4070 DATA, ,„170,104,171,175,175,171, 187,1 
89,171,170,74,95, 75,95 , 95,75 ,224,224 
4100 DATA150,180,160, 224,224 224 sa H 4 HH 
UEERETERTEREREREREEHENEEF ATS PAIR III 
4110 DATA2,189,293, 250, 234,173, 187,189,2 
277 171,122, 124,126, 127,224 
4120 DATA128.128, 128, 128, 128,128, 128,44; 


BEREIT 
ZN DATAa anne el 
1,97,47,47,97,170, 215,215, 215,213,215 
4140 DATA215,215, ,128,224 224 240, 248,24 
Terran 
4150. DATA, 44311446,92,43,47,191,191,109, 
187,171,170, 974,95, 75,95, 127,127, 238,248 
4150 - DATAIB4, 160, 224,224 02240228 oo gu sa 
ee ne 3 FH HT 
4170 DATA1L89,189,250,170, 189,253, 253,253 
‚127,127,175,171.123.126.126. 127.224 
41890 DATAZ24 ,224,128,128,128,128,128 
sahen 

4170 EL PR EIEEHELLTERSTTETEERREREFIF FF: 
„11,11,11,42,181,2945,245,245,215,213 
4200 DATA215,.128, 224 246,248, 254 ‚254,254 
ehhenn TEE EEE ET TRREH 
4210 DATA, ann 20,42,95,97,97,97 191,191 
‚170,170,215,215,95,75,95, 95.254.186 
4220 DATaıaa,222, 332, >48, Zu areas 
EEE 242,2, 10 
4230 DATA11,189,199, 234,170, 187, Fr ee 
243,127,127,175, PLA IDE \2,,203,2 
4240 DATA224 224 ‚224,224 170,128 .128,. 
EEE ETEETE 

2250 DATA a na en a 
„=11,10,47,191,189 253,257, 245,245, 150 
“2 DATASO, 24, 126, 127,127,235, FEDER 
Betr pa ER Ha Beige Treten 
4270 DATA, 244244, 10,10,11,47,47,47,47,19 
11170,170,245, 245, 215,215, 215,95, 254 
4200. DATALFO,174, 238,232, 248,240, 248, 2» 
EEK ELELERERESELELICELETELTEEER TI TH 
4290 DATAIO,11,191,189,170,170, 189, 233,2 
45,245, 75, 75,175,171,122, 124, 254,255 
4300 DATAZ4B 224, 224,224 ,224,32,128,128, 
Irre er 

4310 DATAsraee nr TI nn 
2,2,11,47,47,191,191,189, 253,168, 214 
4329. DATA215,95,95,95,127,127,14128,180, 
A BE En han 
4330 DATA, son rar 10,11, 11,07,47,47, 
170,170,245, 245, 215,215, 215,95, 191,175 
4340 DATA235,250,250,250,254,248,126,128 
EPFRERESEESEEEEELELERSEEETTERRERFR: 
4350 DATA2,2,10,11,171,191,170,170;189,2 
53,248, 245,95,° 9517541712122 122,254 


u ae er 
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4360 IMTA2F5,248,248, 224 ,224,224,170,128 
Pi Dr = Pe ne 
4370 PATAosnnaannarn nenn 
172,11,11,47,47,47,191,170,245, 245,215 
4560 DATA215,75,95,95,,128,224 ‚224 248,2 
Pe = te 2 re Bote 
3370 DATA, 4421242421115 11,47,47,170, 170, 
245,233,245,245, 215 ‚215, 191,175, 107,123 
4400 DATAZSO , 250,254 2454 224,294 ‚120,128 
ne = ee a Ba ‚ir 
#10 DATA2,10,11,97, 171,170, 170, 7253,253, 
245,245,753,95,175,171,122, 122,254 ,253 
#420 DATA240, 248,248, 224 224,224 ,128,128 
BENEEBEEEEDESEN 
4450 DANAyAN SER 
»1412412,11,11,47,47,432, 109, 293,245, 245: 
4440 DATA215,213,95,128,968, 120,248, 254,2 
EL EEE EERTREETTEREEIEERE 
2450 DATAusannnn 225 11,11,47,170,170,188 
ı255,295,245,215,213,175,171,71,122, 750 
2er DATAZSA , 259,794, 740 DA 224 224,128 
EEE EEE EEE er 
4470 DATAIG,11,11,47,1971,170,170,253,245 
ı245,213,959,75,175,171,123,290, 2854 2934 
4480. DATAZS4,740,240,248,7243,274,178,1278 
IETTTWETT ENT TENE 
4470 DATAu user nr ET En 
srerninna A710, A791, 252 
4500 DATAZ245,,215,160, 88,94 ,128,177 255,2 
Bet Le Dee 2° = Pin Des. = Beue Be : Pe Eee ee 
A510 DATAyanannnas nn 1202111411447 ,42, 170 
„191 ,253,253,245,2545,215,175,171,91,122 
2a20 DATAIZE 2 254 254,254  248,248,7248 
Pa De 5, u De Be = De Be PoReeee 
4530 DATA, syn 2122114 51,47,47,47,191,170, 
170,253, 245,215, 213,213, 95, 191,175 ,107 
4540 DATA231,.230,.254 254,254 240,240 ,224 
Pe Dr De 02 te De = Peer 
43350 DATAussnue none 
s+aannı2all, 2, 11,47,47, 191,189, 253,245 
#560 DATAL58,214,215,973,973,127, 253,255, , 
‚128,120,224 224.224 120, ges tneeno nor 
4370 DATA, sansnonunna name 1511, 10,42 4 
7,191, 255,233, 245, 245, 171,170, 94,94..127 
4560 DATA127 255, 255,253, 254,74, 184,164 
Pe ee E27 6. Den De = Pan be: er 
4570 DATA, 141,2,10,11,47,47,47, 191,170, 17 
0, 253,245, 215,215, 215,87,191 ,175,111 
4600 DATA251,251,254, 233,254, 254 ,748,748 
a2 ZB 128 anna nn 
4a DATA susanne 
serien 11,47, 191,19 1,255, 170 
4420 DATA253,2453,245,213,87,75,127,,128, 
224,224 ,290, 248, 240, 224 001 ar a 0 
4430 DNTAussaunn nn 1,47, 10,42,47 
„191,235, 253 ,245,243,169,170,222, 94,74 
4630 DATA127,127,255,127,255, 233,254 ,190 
‚194,158,160,224,128 120 ,usos sa 00004 
440 DATAygaa723372n10,11,47,47,191,191, 
191,170,176,245,213,87,95,217,07,159 
4560 DATA1F1,175,239,233 251,235, 255,254 
254 240,224 224 128 128,120 ayaasann 
4470 DATA, +, 
4580 NLLLSSTEETEEIEEEERELESTERLERETEELTE 
EHER ETIERT IE ET re He FE 
4570 DATA255,253,245,215,215, 95,128, 224, 
Ba,EB, 126,254 75 2 are rn 
2700-DATA, Ha HH HH Eu Hr 11, 11,947 ,10, 10,47, 
191,233,253, 245, 213,189, 169,218, 74,94 
4710 DATA127,127,235, 127, 2395.,235,235, 191 
190,184, 184,240, 240,220 120,120 van 
Ar7zu ERS ICH 2,10,47,47,171 
Pa a pn u 5 BR A. BE Er u Pe 170,245,213,87,95,215 
4730 DATAB7, 127, 191, 175, 239, 257,201,1288, 
235,235, 254 248,748 ,224,178, 160,150, 120 
a7a0 ee 
005 REM PALHWEDEL 
5010 DATA2IB24, , ,,40, 190,735, 295,255, ,10 
‚47,47,175,239,239,251, ,„120,224,233 
3020. DATA239,239,191,,142,191,253,238,25 
5,255, 1.168, 254,205, 255,255,255 ,,,,.,120 
5030 DATAL2E, 224,224, 191, 47.11,.11;,2,2.2, 
re 254,235, Fra a Pe a 255,255, 191, u 
So40 DATA23S, 235,235 ‚235,245 235 254,255 
„204 .,248,224.224,.128,128, 168,285, 175,11 
050 DATAZ, 44417240, 248, 240, 254,190, 190,4 
5,8,10,47,191,191, 755,255, 250,232, 255 
050 DATA2SS,255,255,253,175, 15,15, 251,2 
=1,255,253,255,251 ‚254 254,2 54, A 
s070 DATAZSS, 255, 255, 173,10,128,224,248, 
DER 252 DE En 2, 120,220 
S080 DATAIZE, nun unn 11, 10,12, 2, 114255, 25 
3,171,191,47,47,35,0,128,128,128,128 
SoH0 DATALZE.128, ,.191, 191,47 11, 11424, 


224 224,224 ‚zöl, Re 248, 184, 168 


en 


<51> 
“181> 
“1103 
<121> 
«2385 
<143> 
<19&5> 
ALTE 

„224 
«375 

22505 
2475 


34} 
93> 


<19> 

c194> 
2445 
<211> 
2151> 
<A) 
1723 
“181> 
(2223 
895 

120 # 
<100> 
<20> 

<108> 
<102> 
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SLoo DATA aan 11, ‚a, 1044,42, 191, 


- 
255.255,.171,43,2,1160,250, >35, Fe | 2033 
3110 DATAZSS,235, 441,128, 224, 224, 248 ‚aa, | 
FERTELLTLT, EUREN SET ET “103 
= 120 DATAL7S,255,191,191,171,47,47,175,2 
u Si ,251,254, 254 ‚254,254, 233,253 ,259,255 “5 
S130 DATALFI „255,255, 254, 254,248, 248,224 
& snanannnnd in 11, 07,477 191191 ,191 235 <1R95 
u Bial DATAZSS 255 20 224, 128,128,255 
| | 255,255.254,171,11,11,47, 256, 2855,255 <160> 
| 0.5 DATAZSS, 233, 233,232, 240 , 248,259 „255 
I. 1255,2955,15, 11,114 44449791170,190,104 199% 
ı S150 DATAIBA 184,32, gun 00020047, 
i ı 491,190, 190,248, 150, 240,248,,224 128, ,+ 1035 
h ee: - 170 DATA, 2, ara <1ac> 
ı @ | 85005 REH HAUER 217} 
| 016 hl ERSERSERSBERBEREREEASERLRE 
u or 2r3971170,233, Pina = Penn 1 POP hr 
| @ ı 8020 DATALZO,LI0,,,,,170,255,255,255 104 
N BERLSLEELLERUEELEERETILL TEST ES FED es 
5 DATAL7TO,1F1,191,255, 170,255, 255, 208 
© | +,170,239,239,130,170,2397,237,237,170 «2297 > 
| 7, br DATAZSS , 253,259,170,255,255,235,170 
i 1 DE I 1 rar 
| u | 5050 DATA17O,251,251,251,251,251,251,191 
ei 5170233, 239,239, 208, 238, 294 280,178 2151? 
| dos DATAZTA 255,295, 255,235, 233,253, 255 
| ‚ „170,191,191,191, 171 ,170,239,239,170 235 
© , #070 DATA2SS,255,255,255,170,170,254,254 
i „254 ,754,170,191,171,170,295, 255,255 39} 
soul DATAZSS, 170,253, 255,170, 255 ,233,2983 
en .25,170,239,239,170,251,251,251,251 93} 
= 40970 DATAL7O,259,255,170,255,255,233,253 
| 170.255 ,255, 190, 254, 254 ‚254 ,254,170 6 
IS 5100 DATALF1, 191,253, 239 255 ,255,255,170 
I, eus,sss <112> 
| 5110 DATA, 11 160,248, 249,248, ,11,10,47,4 
| ee FR Fi 1: Fir z40, SU naanannen ann “13953 
a1lzc TR a a zag 1 ä 
a 2a 7 70, 2 BB} 
64130 DATA2SS 235,259, 274,239 ,248,170,237 
ı239,239,2397,170,255, „160,254 254 204 FD 
5140 DATA2S4,170, 254 syerrerto BEE BES ER EE 
nenne ennn nn 1 70,170,254 299, 255, 170,5 <1äl3 
54130 DATAL7O, 255,255, 191 ,255,170,4,170,2 
39,253, 233, 235,173,11,11,170,237,190 1445 
ist DATAIFTı,„191,191,175,171,192,170, 191 
„191,191,191,191,191,,128, 224 224,224 1973 
ol7o DATA224 224,224 4 ETTVTTTERRTT TE TH Kr 
170,255, 255, 251,170, 11,170 ,235, 250, 234 4 
5186 DATA17O,11,11,11,173, 233,255, 171,17 
2 0,1#1,170,191,171,191,191,190,170,170 2123 
“ 6170 DATALF1,191,191,170, 191,391 ,191,170 
‚255.,255,255,170,191,191,191,170,191 <240> 
6200 DATAL71,171,170,255,235,253,128,1972 
„172,192,180,128, 128,128, =1 “181> 
7003 REM RÜDER/AHKER el 
FOLG DATAS1OAO, gasnrensr nn, ii, di, 
„2,2,10,47,186,225,150,128,224,224,232 “a7 
| 7020 DATAZS4 235,226, 224,,110,46,174,248 
| PN: I PER EEE UE Dun L FELL DEU EU Be or) 
| 7030 DATALBA, 106,255, 224, 224,166, 186,46, 
| 45,171,255, Za6, 226, 225, 225, 239 ,239,250 <214> 
o40 DATA23S, 248, 238, 174,174,11,11,17142 
Säuren i2B,12B, ID, DAB, 2, nn onnn1Bh, Lö Tal h 
‚ TOS0 DATALBS,45,46,46,11,11,171,46,96,18 
4,50,224,226,130,250,238, ‚238, 235,235 “2405 
7060 DATA22&, 27,11, 11,174, 174,2 
>93, 232,184, 180,128, 128 ,4#s ar sur na rn ll 125 
’ Fu7o DATASE 35,8, 4141226, 185,47, 10,2, 
' 1226,235,254,232,224,224,120,,248,174 <150> 
080 DATA4E Bananen nan es <208> 
ı 7090 DATA, GH24 24 en 1Fl2I  ZE Zh 
DL. 12 224 224 224 224 224, 14H 923 
TODE Te EN 
4542, Dias 240, 240, 254,190, 1971 ,47,47 39% 
' 7110 MTAIL,2,,,,128, 128,224, 224, 248,174 
Ab 1181142422, 4 44 120, 120,224 ‚224,224 1923 
120 DATA, nn nn nn nn el: 
.7,,210,248,254,1970,171,437,47,47,2,2,11 “1407 
7130 DATALST ZI 2 2 2 2 22 22a 
| „-24.,128,128,128, 128, uarar 1 16H, 14, 11,2 1553 
| 140 DATA2, 1111208, 1209,234,2533,191,42,,4 
7,47 ,191,2353, 250,180, 0 024 234 234,232 al} 
ı 150 DATALZB u nn nn nun nn nn] “72 
. ' 8005 REM TABELLE <175> 
2 BOlIO DATAL2E,72,44,1,32,8,15,4,8, 32,4, 16, 
2,328,1,64 * 35> 
i0 REH— — 5 art 
| il REM > DIE FESTING < TEIL 2 bs 
i2 REH 1355) 
| 13 REM iC) 1984 T.LAMARI ee 
| 14 REM=----uumnnnnn nn nnnnnnnn nn <231> 
28 HOMECOMPUTER 





104 i 


10% REM IMTEN EINLESEN 


LO 8 
110 PRINT" CLEAR)": POKESE, 68: FÜKES2 608: P 
DKESS26G0, 2: POKESF3201 ,2 
120 PRINTTAR(ZSSISPC (2311 " {MMITEIBITTETS 
PACEJEINIGELSPACEININUTENLSPACEIGEDL.DEE 
yım 
130 ReEAbA: IFA=r-1THEN SO 
140 READB: IFB=-1THENC=SO: GOTO130 
i50 POKEA#+C ,B:iCeC#+1:G0T0140 
150 READAF: FÜRA=0TO4: FORE=1 TO20: POKEFT4] 
+, AGCiMIDECAR,B,1H) 
170 CeC+l:NEXTB,ArFORA=0TO4: POKEIF416+20 
.h,49+A:MEXT: Ce 
180 READAF: IFAF=""THENFORT=0TOT:READEC,B: 
FORE34048+C „BrNEXTrEND 
170 FORA=1TOLEN (As) ı POKEF404B+C „ASCiMIDE 
(ü# ,A,11}tC=C#11 NEXT:GOTOLGO 
i001. 3 
1092 REM GRAPHIE 
1003 1 
1005 REM KL.SCHRIFTROLLE 
1010 DATASZ1424 ,,10,37,37,149,149,,165, 165 
‚170,05,85,70,101,101,101,101,128, 10% 
1020 TIMTABS, 147,101 ‚89 ,70,90, 153,150,149 
‚37,37,37,37,37,101, 166, 105, 149,09, 08 
1020 DATABS,23,102,.190,86,89,89,89,153,1 
01,41,9,9,9,97,97,9,9,85,85,85,85,89,85 
10640 DATABS,85,101,101,101,101, 101,101 ,1 
01,101,9,7,9,.37,57.,97 1974 153,83, 85, 85 
1050. DATABS ‚85,05,85,85,101,101,89,09,89 
‚87,70,84,149,149,149,37,37,10,4,85,85 
1040 DATABS,85,85,85,170,,05,150,102,104 
‚89,1&0,, 
1070. DATA1QO,159,05,85,87,101,145,155,170 
85,05, 169,66 ,04,06,06, ,150,88,88,84,8& 
1080 DATA?6,90,153,150,149,101,102,101,1 
01.101,06, 190, 105, 149, 05,05,85,149,102 
LO DATAIiSO,B&, Ge, 88,88,68,94,102,105,8 
9,87,87,87,09,09,09,65,05,605,05,05,83 
1100. DATABS, 76,76,96,96,96,96,976,76,89,8 
9,87,102,101,101,101,149,85,85,85,85,85 
1110 DATABS,85,85,98,104,BE,88,B5,B6,70, 
102,199,199,147,37,37,10, ,,83,853,897,8& 
1120 DATABA,B3, 170, „04,06,84,88,88,160,, 
1130 DATA,42,149,84,,05,03,05,85,,42,147, 
05, 05,85, 95,85, 1128,106&,101 ,147,55,535 
1140 DATABS, ,„130,105,89,84,85,85,,,170, 
05.69,85.65,05, ,.128,06,85,85,85,85, , 
1150 DATALO,I7, 169,159, 90,89, ,,128,106,8 
4.685,85, 65,.,.130, 105,85 ,89,89.4.,170 
i1l&0 MTASS,85,86 ins 16h, 0,159,85,85 
ı#111170,86,05,09, 411160, 70, 150,85, 7, 
1170. DATAS2, 139,199, 139,101, 2, ,130,101,8 
= ,85,85,,,.1170,86, 105,86, 85, 44170, 21 
1120 DATA1L01 ,85,85,6895,,,170,83,85,84,85, 
95, ,,126, 101,149, 101,85,85, ,,170,85,88 
1170 DATABS 85,85, ,42,165,153,85,89,85,8 
5,,170,84,87,85,85,85,85 
1200 DATABS,„ 101,170, 43744109409, 159 , 24 1 9 3 
„85,149, 108,170, 14+.85.85.05, 170, 41,,85 
1210 DATABS,70,169,,42, 11 ‚05,05,895,605, ı70 
.105,86,06,104, 178, ,,,165,149, 149,22 
1220 DATA41,2,,,093,03,05,05,853,170,,,189, 
95,99,08,70,160,,,03,85,85,83,170,,,,85 
12350 DATABS,85,101,1497,42,,,85,85,05,87, 
86.168, , „85, 85,85,85,85,170, ,,„85,85,147 
1249 DATAIOS,86,168,,185,85,85,85, #2, 1 33 
05,86 ,805, 90, 168, 4414185, 853, 149,170, 47 
1250 DATA105,90, E51 ln 
AZ nt 
2005 REM BUCHSTABEN | 
2010 DATA18432,85,85,83,85,853,85,85,85,2 
5.021.221 ,253,221,221,221,09,249, 221 
2020 DATAZ21,245,221,221,2453,85, 253,221, 
213.213, 213,221, 253,85,245,221 ,221,221 
2030 DATA221,221,245,85,253,221,213, 245, 
213,221 Pa Pu Fr | „213,245 ,213,213 
2040. DATA213,083,233, 213,213, 221,221, 221, 
253,05,221,221,221,233, 221,221,221,65 
25 DATAZSS,117,117,117,117,117,, 2953,85, 
125,93,95,93, 93,221 ,233,85, 221, 2213221 
2050 DATAZ45,221,221,221,85,213,213, 215, 
213,213, 221,293,89,221,255,233, 221,221 
2070 DATA221 ,221,05,253,221,221, 221,221, 
721 „221,85, 253, 221,221,221,221,221,253 
2020 DATABS.245,221,221,245,215,213,213, 
Ei, 253,221 ,221,221,221,221,247,03,243 
2090 DATA221,221,245,221,221,221,85,253, 
221,213, 253,73,221,253,85,253, 117,117 
2100 DATA1L17,117,117,117,85,221,221,221, 
221,221 ,221, 253,85, 221,221,221,221 ,221 
>110 DATA253,117,85,221,221,221,221,2533, 
255,221,85,221 ,221 ,253, 117,253, 221,221 
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2120 DaTass, >21, 221, 221 ‚253, 117, il?7, 17, 
9, 35, 117, 213, 221, ee g5, 85,85 
2130 DATABS, 253,85,85,85,85,85,95,05,85, 
85,88, 117,09, 295,119, 119,119, 119,119 
2140 DATA255,85,217,853,85,05,05,63, 221,8 
5-1 

2145 REH ZIFFERN 

2150: DATAIGBI1S „253,221 221,221 ,221,253,2 
=33,85,117,245,117,117,117,117,253.88 
2150 DATA2S3, 221,93, 253, 213,212, 253,85,2 
43,221 ,93,125,93,271,253,85, 213, 213,215 
2170. DATA245,253, 117, 117,85, 233, 221,213, 
253,93, 93,253,83, 213,213, 213, 258, 221 
2100 DATA221,253,8%,253,221,93,93,93,93, 
75,09, 253,221 ,221,233,221,221,257,55 
2190 DATA2S3, 221 ,221,253,93,93,93,85, 1 
2195 REM INSEL 

2200 DATAIBTIZ GH 4700024944 10,47,47, 11,42 
‚149,85,140,248,190 , 254,295, 2553,170,85 
2710 DATA42,1#1,255,255,191,255,170,85,1 
38,239 ,190 252, 252,233, 170,03, ,128,224 
=220 DATA224,724,178,109,94,-1 

=005 REM WOLKEN 

F010 DATALBTFE 4415 285 Ina 252,255 ,2 
Spann n299, 29541 Pe 1 Tee a | 
3020 DATA, 4421239, 252, 192, 54-1 

5105 REM WELLEN 

3110 DATA33F20 IE le Pe Pe Eee: | 
I = 1 PP De a Bee Be 
120 DATASA na Or San nn Danananan 
[aber ee r SP e Hrnerert 

1.50 DATAS nun OA pi u Pen Er 
er9r Börns En: . 0 = Poren L 

4003 REM GR.SCHRIFTROLLE 

4010 DATAZZOLE 44124249, 9,9,10,165,149,8 
3,85,85,85,85,170,85,05,05,85,07,85 

4020 DATABS, 128, 106,149, 149,05,05,05,85, 
9,37,37,37,37,10,10,7,05,09,85,895,89 
4030 DATABS, 147, 101,83,85,05,09,05,05,85 
‚E5,85,85,85,85,05,05,85, a 


- Bi LE Du mu 55 | 
4040. DATABS,85,149,32,9,9,9,9,85,95,85,1 
70,05,03,053,88,8%7, 101, 105,1 7.,83,83,85 


4050 DATABS,2, 169,06, 05,85,05,85,05,170, 


B5,087,89,101,101 , 101 ,147,170,653,605,65 
4050 DATABS,85,85,85,,140,98,104,152,68, 
BB,102,85,85,05,03,8%,83,85, 101,149 
2070. DATALS55,153, 149,147, 101,101,101,85, 
170,05,85,66,87,685,05,04,85, 150,150, 102 
4020 DATALO2,102,102,57,09,155,90,85,85, 
B5,85,101,89,86,170,85,95,05,85,55,85 
A0ao DATAEG,167,85,85,85,85,150,150,84,8 
5,85,80,104,150 
4100 DATA, saasaHı dh 2 A et 85,85,85 
„B5.85,85,149,101,05,85, 95,85,85,85,85 
atıd BATABS HH 4947 9,9, 7,9, 7,2,85,8 
5,05,95,85, 101,149 ‚03,88, 03 ,89,05,05,85 
“120 DATAES BB naasanıenzh ZrZanrın HB 83 
55,149,149, 39,41 ,2,85,89,65,85,85,85,85 
4130 DATA170,84,84,84,85,84,85, 865, ,Böyysss 
„170,85, 85, a1, nr 160,170, 150 
4140 DATABS,B6 ‚84 ,86,89,85,89,86,85, 16%, 
B5,05,149,149,147, ‚as,0s. 'Bs, 56,84,87,85 
4150 DATAGS,129,128,129,76,76,76,95, 94,8 
5,895,84,0& ‚87, 85,85,170,149, 149,,149,101 
län DATALO1, 101,87, 170,85,95,85,85.87,B 
5,70,160,75,94,120,120,128, ,, | 
4170 DATA,170,03,83,83,893,85,85,,,170,85 
„85,65,85,05, ,188,84,89, 101,95, 85,85, 
4180 DATALO,155,87, es, #5 ‚ES .65 05.895.170 
‚93,895,85 ‚B5.,85,85,170, 05,05,09,85,05 
4190 DATABS, 101. 149,105,89,89,095,05,05,1 
01,70,149,85,085,85, Es, 55,85,05,85, 
jran)e] DATABS 85,170, 85,853,63,65,85 
‚‚95,85,85,895, 101 ,89,B6,148, 85,85 
4210 DATAQS, 101,148, 42 
4220 DATA2,9,9,9,2,2, 2, 2,2, 2,2, 2,2, 2,2,2 
ld, > .s, 5, 2,2,9,9,9,9,9,9,9, e ‚sa 
4230 DATASF, 37.37.37, er 27 39,4 
147,7,4113713741357137,37,37,31,37,37,77 
4240 DMTAFT 41,10, # „9 .4l, 78, 37, 37, 37, 37, 
37. ,37,37,37,37,32.37437,374, 37437, 37, e 
4250 DATA41,38,37,37,37,37,37, "37,37, 37,45 
7,30,37,31, 37,37, Tr 
4250 DATA37 ,30,9,9,37,37,37,37437,30, 41, 
TTTTT T T  T 99 9 7, 
4270 DATAF 
4280. DATABS,B6,86,B6,B6,B6,06 06,86 ,B,1 
02,70,B89,89,85,86,84,.54,065,85,85,B6,B4 
4270 DATAFO,8B,75,104,150,85,864,806,85,B& 
86,86, 86 ,86,86,B4,1072,89,70,85 ,B&,Bö& 
4500 DATAGBS ‚86,85,86,86,86,86,86, 102,28, 
E9,104,157,88,20,68,80,Bd,BB,BB,2E,B8 
4310 DATABB,29,68,289,68,28,88,B8,28,88,8 
0,80,28,B0,20,88,152,76 ‚Ta, 132,B08,68,08 
4320 DATABB ‚88,88, 80,68 ‚88, 38, 88,08,88,8 
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EEELERERIReTeER 
„I NEHIETSPACEN = 


'2,89,08,88,29,88,152,104,96,96,88,88,B8. 
DA 


TAGg,EB,20,80,88, 39,09,99,59,89,8 
8,28,689,66,808,1&0, 96... 89.102,86 
“540 DATA-I 

5005 REM TITELSCHRIFT 

sold DATASZ7EE,85,09,110,191,111, 91,91, 
1,85,85, 170,255, 235,250, 229, 229, 85,097 
Sol DATAL74,254,254,174,89,85,05,89, 110 
„171,111,91,91,91,89,05, 170,255 235,250 
5030 DATA229 ,229,85,87,174,254,,254,174,8 
7,085,85,04,91,111,71,91,71,91,85,90,175 
234,233,175,71,86,85,64,155, 155,155, 135 
050 DATA159,85,83,85, 170, 255,255, 175,91 
‚71,05,83, 170,255, 255, 250,229, ,229 85 
0650 DATA1L47,227,230,229,229,149,85,85,1 
G,104,255,190,1970,170,190,85,85,94,155 
070 DATABSE,BS,85,85,85,101,105,2534,249, 
249,.249,.249 05,04, Fı,ttt, 71,91,F1,91 
SOB0 -DATABS, 05, 149,229, 229 229,249 249,8 
5,89,110,191,190, 190,170, 170,85, 85,0% 
070 DATALSS,25,04,04,05,09,150,235,255, 
255,254, 249, 249,05, 165,250, 255,255 171 
=100 DATAD ,B4,85,149, 229, 229 229. 229.22 
7,149 

S3110 DATAYL, FI #1, 111,111,91,91491,229,2 
24 250, 255,235 ,2530, 229, 229,05,149, 229 
=120 DATAZ29,229,229,,149,88,91,91,91,111 
„111,91,91,91,229, 229,250, 255,255, 250 
2150. DATA229,229,05,149 229, ,229,229.,229, 
149,85,71,05,805,85,85,65,85,85, 229,250 
5146 DATAZS5,191,111,191,105,85,85,165,2 
47 209,249 ,254, 190, 111,05,85,03,05,503 
s150 DATA83,B3,147, 91, PB, Pi RL IL, 91,9 
1,91 ,229 229 ,229,249, 249, 225 229 ,229,05 
S1&0 "DATABS, 85,84 ,88,85,85,85, 190, 190.17 
0,255,255,170,190, 170,85, 86,86,155, 155 
5170 DATABS,B4,86,249, 249,239 234 234,24 
7,249,2497, 1 „1,91,111,111,91,91, 91,254 
Ss1B0 DATA2S4, re 2 239,239, 233 ,235,190 
„170,190,171 255,254 254,254 ,05,B65,8& 
3170 DATALSS, 155 ‚B&.06.06, 749.249.240.25 
4,254 249,248, 249 ,85,05,1065,191,191,107 
200 DATAPL,FI,BS.BS. 55,.147,229, 229,229, 
227 

S210 DATAFL,F1,91,111,191,110,09,85,229, 
220,229,249,254,.105, 101 ‚03,053,03,63,85 
220 DATABS,85,85,85,71,91 71,111, 191,11 
0,89,85 229,229 , 250 255,235, 170,85,65 
3220 DATABS,89,174,254,254,174,07,95,84, 
71,91,71,71,91,86,05,83, 1490, 224 238 255 
3240 DATA175,70,85,111,111,191, 235, 255,2 
35,150,85,149,149,149, 149,229, 149, 85,85 
2250 DMArAri,71,91,111,191,110,89,05,229, 
229,229,249,254,185,101, B5, 55,85,85,88 
ee] DATABS, = Een ‚85,190, 190, 191 „191,255 
‚184,101,05,86, 56,171,233, 255 254,189 
5270 DATAGS, 249,249 249,249 ‚254,105, 101, 
95,71,91,91,971,111,91,84,85,230, 250,227 
3280 DATA227 229,149, 85,85,254,254, 190, | 
20,171,110, 69 85,85 ,84,864,64, 155 ‚24,05 
3290 DATABS, 2 a a, 255, 55, >33, 130, 
B5,91,91, 175,205 ,255, 250,165, 05,229.,229 
5300 DATA22S. 227,249,229,149,859 

310 DATASF,110,191,110, 110, 110,110,110, 
83,153, 249,190, 110,110, 110, 110, 55,1 
0 DATALI1,71,91,91,91, 7, 85,149, 270,1 
20,147,149,149, 14%, 101,184, ‚255.186. 185 
5330 DATAIBS, 191, {06 85, 147,229, 149,853,8 
4,147,85,110,110, 171, 110, 07,05,85,85 
5340 DATALIO. 170, 249, 145,85, 85,65,85,71, 
71, 111,91,04.05, 83,05, 149,149 ,250, 147 
5350 DATABS,B5,85,85,165,18&, 235, 184, an 
‚BA, 85,85,85, 149,229, 149, E53 ‚5,Es, B85,- 
Ss260 DATA=1 

"oO REM TEXT 

"ol ee BIN 

7O20 ATGESCHRIEBENCETRLAYVONTETRLAYTI 
NOBLANARTCETRLAFANNDSDONINIELFBALCTRLAIF 
VER@LLZBSPIELERCETALAY" 

030 DATA" CRESTOREL{ETRLAICBIHREBIEITEISE 
TeUMeL CT FRLAFRANGLISTEICTALAI" 

70890 DATA" NAME EETRLATTNBBNN ANA NAANNCETRL 
ATTBBNNNANNNAANANIETRLAN" 

EOOS REM BPIELBILD oO 


3010 DATA" LELEAR BVSOFF — Br 


2020 DATA" ——EHGREYI ArtRFSOHINDPORST 
UVWRYZENIT_ISRACEIIMCRKSOFFILEFSONFBAL 
FEi——t 
8030 DATA" EDGREYI=-#| —CHGREY I TERROR 
NEE} TNBEKANONTERBERIERCRFSOHIBEDERFSOFF 
LIG.REDYA je |" 
BOAO DATA" IDEREFI-I| Is = SHGREr> Preesseee 
(ALSONSEFGLANEOFF MIEELBEN, 








<127> 
<247> 
116» 
2353 
228} 
<> 
«238> 
«33 
“1805 
22205 
<br> 
<t1l> 
<76> 
<7B> 
<10B> 
ci2> 
<186> 
c12> 
1315 
48: 
<125> 
arte 
rt 
73 
<100> 
62025 
239% 
<20% 
<130> 
«1125 
1ld2> 
40) 


“752 
18} 


<146> 
1405 
<143) 
2163 
181) 
<ilö> 
<120> 
2307 
290% 
<59> 
ruhr 
En) 
45 > 


127 


<48> 
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BOSO DATA" CDEREYILNSTIOCHGREND  LDRANG 
EI000008BESTUFERLEOOOOORERFSONIHLJCRFSOFF 
AISRED IM LF" 

BO40 DATA" CDGREFIE XOtNGRErI Se CAFSON) 
2b’ 0184, —. /OLPISSATBTKLHMERFSOFF LIG. RER 
I Ian" 

8070 DATA” BROWN}, ! 








if pain . 

Ed MIA —————ı- „—, 

—/ u 

EG DHATA“- LH 
GREEN"  —" 


B100 DATA" CAVSOH) — 


BLlG DATA" 
ul u 
9120 DBATAY [JE JE em 


nd L |. 0 LU a 


Er u Er 


B140.DATAr— 14 16 16 — ht [4 Id 

g13o DATA’lie+,- 

14 [4 —" 

E10 DATA". ZOlZ Zn | 
I ed u Ki 

81 70 ATAMASLFTEF— [4 [h [em 

4-7" 

Eg1iH0 DATA"ı7%=>7— 
+ er 

8170 DATA” 
— "Te" 

B200 DATA“ 

a na, ı DH un ke 

8210 DATA a — — — 

LAWSOFF}" 

8220 DATA"{LIG.RED) „u_ -ItRFSOH) + |# 1# HI 

IKLMNDLAKSOFFILN-T W_FCRFSON)- #14 IHCAFE 

OFFIZIA56” 

B230 DATA={LIG.REDI-HI I DT{HGRETIeABCDEFG 
£LIG,RED RFSOHIRSTUWWERPSOFF}| + KHGRE 

YIXYZCHIT_CLIG .BEDIBIT I" 

B240 DATA"CLIG.REDI 6 en CHSREFIHLIKLAND 
{LIGo.RED AFSONIZLCHGREFINIT_CAFSOFFI |, 
{LIG.RED SHIFTSPACEHE CHGRET SPACE) Test 
"CEIG; REDDIT —" 

8250 DATA*LLIG. RED BESOND ADCDEFGLRFSDER 

HOREYIORSTUV GL IG.RER AFSOHY!'UcHGRErISTE 
ARFSOFFI) E IELIG .REDI FF IHEREN I tm EL 
IG,REDIT—| I, TLEFT IMST) \CHOME CTRLAY" 

o05 REM TITELBILD 

O10 DATA"TELEAR AFSOEF DEREY SPACE 

= pppililiiiiii NSTTCHPAGET I" 

7070 DATA"’ISPACEE}——| BRBRBBbERBeHBeBreE 

EW_FSPAGETI" 

7030 DATA" TEFA AcEe} I. II TTIRIEIEII I EI 

I „xot: 

OC DATA" CSPACET + BERBBESBELAFSON:T IM | 

»tRFSOFFIeBBBRARAR LAFSOHIMLCAFSOFF SPACET 

1 Es 

70350 DATATESPAGET} - BRBeBeBeeLlArsonı lt! 

» (RUSOFE) ageRaBRae«K WSOHINCRFSOFFE SPACET 


aan DATAFTXSPACEFI"BILIG.RED RYSON}” _I5P 
ACEY HERE Oie+ ,—. /OLZIIOLRFSOFFE SPACE?) 
vi 


9070 DATA" ISPACETRACRFEON) SETEF: = >74 
II Sk -PiIRFSDOEF SPACETI”" 

7080 DATAMISPACET BESONFELBPSOFFEIBLRESON 
HT 20% EHI WCSHIETSPACENE DCRVE 
BEF SRACET}" 

FOF0 DATA" ISPACET RYSOMIALRFSDOFF ORANGE) 
NERERDERUSRAGRGRGRRRRRRBCRFEOMIRLVEDER 
SPALEF}" 

100 DATALSPACET RVSOHIB{RFSGFFIEREReRE 
BERRRRERBRERGRRRRLAFSONISTRFEOFE SPACET) 


3110 DATA"ISPACET AFSONICLANSOFFIeBeBESE 
BEREGRRERRORRERBRLRUSONITLRUSOFF SPACET) 





ed 





#1#1+ 1 


Bl 1 I | 





9120 DATA"ISPACET IDtAFSOFFIeRRReRe 
BUaReneBsuaaanneR LAUSDMILICRUSOFF SPACE?) 


7130 DATA" CSPACET AVSON)ECRSOFF)eReREeR 
BRORERRBEREERSERRCAFSONIVERKSOFE SPACET) 


7140. DATA" CSPACET RVYSONIFIRVSOFFIGRBEReR 
BRARBRRERODHERRERLRFSOHIMLRFSOFE SPACETI 


9130 DATA"LEPAGET AFSONIGLAFSOFF)ORERBEE 
BruenBennaaRenne (AN SONIKLAFSGEF SPACETI 


7160 DATA” CSPACEZ AFSONIHÜRFSOFF)eRsREEe 
Ba ORRLAFSOHNI TLAFSOFF, SPACEN 








n 


7170 DATA”ISPAGET BYEON) TERVSOFF ee 
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BRSBERREREREBEHERLAVSONIZLRKSOFF SPACE?) 


180 DATA" LSPALET AFSOHIICRFSOEF)GRRBEBE 
DR ERLBRee LAFSOHILCAFSGER SPACET 


FL90 DATA"LSPACET APSOHIKLAFSOFFIRRRREER 
aasBagageReneeene (AVSONINLRVSOEE SPACET) 


7200 DATA" SPACE? RESOW)LIRNSOFF)ReRARRE 
BERREARRBORRERBA@LRFSOHI IERVSUFF SPACEFI 
7210 MATAT{SPACERI+ HERBEEErr een 
GEBE} M KSPACEN) " 

9220 DATA“ (SPACERT (WERE 
eeeaF IHSPACES" 

9230 DATA" (SPACER SHIFTSPACEN a. 


——| 





— DU_{SPAGES HOHE ETRLAI"," 


9505 REM TABELLE | E 
7510 DATA2I1,34,1139,34,1172,34,1433,34, 


15 REM iC) 1984 T.LANARI 

RE [rn 

104 4 

105 REM DATEN EINLESEN 

ib 

1106 FRINT"{ELEARY":FOKRESE „68: POKEF2 ,581P 

ORES3200, 2: POKE33281,2 

120 Bu ER HU HS 
PACEHEINIGECSPACEIHINUTEN SPACE IGEM ICH ES 
PACE ä Er} 

130 READA: IFA=-1THENISO 

140 READB: IFB=-1THENC=0: GOTOLSO 

150 PÜKEA+C , BıCcsCc+1:60T0140 

154. ı 

135 REM FLUGBAHN 

iss: 

160 G=23920: FORA=3. 3703. 98TEP. SıDeAsfelı 

E=, 09: FORB=OTO4B: POFEG+C, FibseCHliFef+D 

1706 Deb-E:NEXT:POKEG+C „GO: C=eC+1: REIT: FORA 

=, 3103. 35TEP. 5: Defı F=etlıEsAf70 

180 FORB=-OT048: POKEG+C,FrC=C#HliF=ef#+bı Deb 

-Ei NEXT: FOREG+C 0: C=C+1:NEKTIEND 

1001 : 

1002 REH HASCHINENPROGRAHF 

1003 7 

1005 REM BILD AUSGEBEN 

1616 DATAF5352,150,0,152, 133,132, 232,134 
‚2535,170,240,18,.177,252,201,1,208, 3,202 
1020 MTA2AO,5,32,45, 142,55, 176,241,32,4 

5,192,177,252,201,1,200,1,76,32,210,233 
1950 DMTAL5Y,0,133,212, 56,176 ,236,183,25 

2,24,105,1,133,252,165,253, 105,0, 133 
1940 DATARS3,95,-1 

1105 REN TITEL 

1110 DATATS415,1697,0, 141,143 ,220, 135,178, 
141,24,3,159,144.141 ,25,3,1697,,128, 141 
1120 DATA1L43,.2,.159,60,191 , 158,2, 32,54,14 

4,159,12,32,0,192,159, 150,141 ,0,221,164# 

1139 DATA1i31,141 ,2497,71,180,125,140,248, 

71,200,140, 250,71, 200, 140,251,71,1&0 
1136 DATA24,185, 167,143, 153 ,,0,212, 134,16 
‚247,180,46,165,120, 143, 153,0,208,13& 
1150 DATATIS,247,1859, 1, 141,38, 208, 1&0,0,1 

62,133,132, 252,134 ,253,169,5,133, 2,153 
L1&0 DATAZ,185,217,143,133,214,163,223,1 

45,153,211,1683,229,143,141,1,208,183 
1170 DATA2IS, 143,141 ,0,209,32,109,229,32 
„77,143, 170,2, 14,272,149, 17,141, 21,708 
1190. DATA152,,0, 32 ,224,144,159,13, 141,39; 

200, 159,14,141,.21,208, 159,241, 1431,23 
1176 DATA212,1597,25,141,1,212,159, 129,14 
1,4,212,1659,5,141,5,212,159,30,141,24 
1200 DATA212,54,176, 253 

1750, DATA?O4,0,4,208,2951,.157,B0,141,0,4, 

205 ,2,94,208,665, 169, 70,191,2,4,159,128 
1250. DATA141,4,212,173,4,4,201,32,194,49 
„173,27,212,41,2,77,1,208,141,1,209,175 
1270 DATAZ7 ,„,212,41,2, 77,0, 208,141 ,0, 208, 

173,27,212,41,31,24, 105,145, 141, 22,212 

1280. DATALT3,1,208,205,3,4,240,8,141,5,4 
‚159,129,141,4,212,204,154,200,170,1&57 

1279 DATA129,141 ,4,212,95,32,241 ,142,182 
‚o0,32,224,144,177,252,141,3,3, 201, 1,208 
1500 DATAS, 32,45, 192,95, 32, 210,255, 32,48 
„142,32,241,142,173,0,2008,24,109,8,131 
1510 DATAO,209,55,1765,2722,=1 

1505 REN Vic 

1510 DATAFA728,0,0, 230, 210,100, 74,248, 74 
.0,0.0,0,0,0,0,0,0,27,0,0,0,153,215,1,18 


1520 DATAO,0,0,15,2,0,0,2,2,7,0,0,0,15,3 


August/September 


19T 


2483 


513 


«110? 


<B> 


“1883 


er 


“1633 


120> 





«227> 
«83 

1393} 
“20 
2313 
+142> 
lbd> 


ML ra 


<1B1> 
<102> 
4 
“8? 
al2> 
1523 
“e2la> 


<149> 


38 


1982: 


u - Ei 
1395 
ac 
„12% 
„i= Eh 
2137 
74} 
241? 
<2l&a> 
22 
een bh 
“10% 
i91> 
2104 > 
ehi-R 
1705 
<b> 


“as: 
iS2> 


“131? 
2013 
193 
“141> 
“171% 
<131> 
“132> 
“B> 


el 


ee re 


it 


# 


l 1 
Bau 5 


'86 





j 
| 











a —  —— 


| 
l 
|| 
| 
# 
| 
| 


FT BT 


Li 


ee en —_ — — - Lo 


2,8,8,0,0,0,0 
1525 REM SID 
1350. DATAO,3E,0,0,0,115,0,0,0,0,0,.0,0,0, 
0,120,0,0,128,0,0,0,0,.23,35 
1549 DATAO,0,0,0,0,0,250,0,0,0,0,129,0,6 
4,0,55,0,0,128,173,0,0,0,6,72 
1605 REM TABELLE 
1510 DATA2O,17,15,13,11,9,15, 12,12; 14, 10 
„14 
1820 DATA FA, 154,135,,120, 104, og, 14h,122, 
122,138, 170,138, 1 
180% REM REBTORE 
1810 DATA34B44,167,127 ,141 ,0,220, 32,234; 
2355.,52,225,253,200,0,1697,4,141, 136, 2,76 
1820 DATA71,254 , 162,290, 154,76,3,157,-1 
2005 REM GRAFIK KOPIEREN 
2010 DATASAFZE, 160,0,162,74,132,252,134, 
255,150,15,152,125, 132,254, 134,255 
2020 DATA140,0,177,234,145,232, 200, 208,2 
49,230,253, 230,255, 165, 253,201 ,79, 208 
2030 DATA237,177,254,145 ,252,200,172,120 
ı208,247,96 
2040 DATAiS0,0,162,74,132,252, 
0,654,152,121,132,254, 154,233 
2050 DATA150,0,177,254,145, 257, 700,708,7? 
De En LE 3 201 Pr 28 
‚200,247,95 
2105 REM" WIE 
2110 DATA24,195,54,185,80,230,240,230,0, 
274,164 ,224,0,27,221,0,0, 259, 218,12,20 
2120 DATAO, 129,255, 255, 740,0,0,2,5,14,0, 
0,0,1,10, 13,9, 412,247 ,0 
2205 REM TABELLE 
2210 DATA1O4,104,105,105,107,107,108,109 
„110,110,111,112,113,113,114,115,, 118 
2220 DATA11&,117,118,117, 117,120,0, 172,1 
29,64 
2503 REM WERZDEGERN 
2310 DATALSO,0,136,208,253,202, 208, 248,7 
5,1 
2405 REM TABELLE 
2410 DATA37120,0,3,6,9,13,16,19,22,25,28 
,31,34,37,40,43,45,49,52,55,59 ,62,65 
2420 DATA&B,214,9,58,108,159,208,2,32,10 
2,1952,202,101,102,102,102,102, 102,103 
2430 DATA103,103,103,108,-1 
22703 REM SPRITE-KOLLISION 
25310 DATAS71B4,160,2,173,8,4,41,1,208,1, 
158,195, 11,4,153,1,208,173,30,208,172,8 
2520 DATA4,208,5,141,41,4,192,1,208,3,14 
1,42,4,192,2,209,3,141,43,4,192,3,200,3 
2530 DATA141,44,4,96 
2540 DATA1L73,8,4,24,105,1,141,0,4,201,4, 
144 ,5,169,0,141,8,4,173,8,4,41,2,208,4& 
2550 DATALSO,6, 1542,16, 165,0,5,1397,0,208, 
202, 202,175, 15,243,150,9,162,5,152,157 
2560 DATA250,71,1356,202,16,248, 160, 2,173 
‚8,4,41,1,208,1,158,185,11,4,24,105,133 
2570 DATAS5,176,43,160,4,162, 15,18%, 10,5 
„,157,0,208,202,202, 155,15, 245,160, 15 
2580 DATALH2,5,152,197,250, 71,158, 202,16 
‚249,140,2,173,0,4,41,1,208,1,158,185 
590 DATAL1,4,24,105, 107,201 ,21,176,3,15 
3,1,208,160,15,159,0,153,0,208,136,135 
2500 DATAL92,3,208,247,159,129,133, 167,1 
60,14,173,15,208,37,157,240,18, 183,0 
2610 DATA208,201,845,144,11,169,255,564,22 
7,157,45,21,2089,141,21,208,70,147,135 
2420 DATALI4,15,225,173,20, 208,95, -1 
#763 REM PUNKTE ZAEHLEN 
2710 DATAS7440,140,28,4,172,74,4,201,0,2 
40,10,172,75,4,201,1,208,3,172,75,.4,.132 
2720 DaTal7o, 173 „0.,64,24, 101,170,141,0,&, 
173,1,6,105,0,141, ‚1,5,173,0,5,24,108 
2730 DATA223,141 0484173, 146, 1053,0,141,1 
16,76 
3740 DATAL40,34,4,172, 74 ,4,201,0,240,10, 
172,75 ‚4,201 ,1,208,3, 172,75,4,132, 170 
2750 DATALT3,2,6,24,101,170.141,2.6,173, 
3,5,104,0,141,3,5,173,2,6,24, 103,229 
27&0- DATA1L431,2,6,173,3,6,105,0, 141, 3,6,7 
5-1 
2805 REM TABELLE 
2E16 DATAFTS32,64,192,44,192,659, 192, ,54,1 
72,08,88,89,89,90,70,08,08 
2920 DATA1L,2,1,1,1,0,1,2 
2850 DATAO,128,0,128,0,178,65,45, 46, 56,6 
7,67,13,10,7,4,2,8,17,8 
2840 DATAO,2,4,10,12,14,12,48,192 
192,-1 
“703 REM MEUE SCHIFFE 
2710 DATAZF&EFE,170,187,24 147,133, 150,18 
7,30,147,137,147,173,27,212,41,7,158 
2920 DATALBS, 34, 1947,157,17,5,173,27,212, 


134,253 ,1&4 


‚12,48, 
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4 ‚56,74, 74, 74,168,185,0, 147,133,170 
2930 DATA185,8,147 ‚133,171,109, 18, i47,15 
7,45,4,185, 171,24, 108, 3,158, 169,88, 132 
2740 DATA2, 224,3,176,16,173,50,4,41,2,24 
06,132, 171, 169,251, 133,2,56,176,13,173 
2750 DATASA,A,41,1,240,6, 132, 171,169 ,251 
„135,2,160,127,177,170, 145,188, 136, 16 
=960 DATAZ49,159,5,193, 167,133, 171, 189,4 
#,147,133,158,24,109,1,133,170,1099,30 
2970 DATA147,224,3,144,9,15,16,5, 141,16, 
2,26,176,6,13,5,5,141,8,5,150,0, 155,2 
Z9e0 DATA145,159,274,105,24, 145, 170,173,7 
2,4,157,50,4,157,55,4,1549,0,157,80,4,976 
2970 DATA-1 

2005 REM RASTER 

3910. DATAS7B88,173,25,208,141 ,25,208,173 
‚18, 208,201,121,176,113,1697,15,141,32 
3020 DATAZO9,167,2,160,12,138, 208,253, 14 
1,32,208,159,121,141,18, 208, 169,18, 141 
3030 DATA24 ‚208,169, 7,141 ,34,208,159,14, 
141,35,208,52,64,145,32,128,154,160, LO 
3040. DATA159,123,153,5, 208,135, 15,250, 1& 
0,7,152,5,152,1537,250, 71, 156,202, 15,248 
3050 DATAL0,4,162,15,185,0,3,157,0,208, 
202,202,135,15,245,173,17,5, 141,41, 208 
>050 DATA141,42,209,173,189,5,141,43,208, 
141,44,208,173,17,5,141,45, 208, 141,45 
3070. DATAZOG,, 159,235, 141, 21,208, 75, 188,2 
>4.201,193,176,28,169,6,141,33,208, 150 
3080 DATA1O, 136,200, 233, 157,14,141, 34,20 
B,159,20 „141,24, 208,167, 143,141, 18, 208 
SorO DATA7S, 189,254,201 ‚170,176,72,160, i 
5,162,5,192,157,280,71,136,202, 14,248 
3100 DATA180,10,1689,150,153,5, 200,134, 16 
‚=0,160,6,152,15,185,10,5, 137,0, 208 
s11l0 DATA202 202,135, 1& ‚245, 173,20, St 
‚41,208,141,42,209, 173, 71 ‚3, 141,43, 208 
3120 DATAlI4L,44, 204,173, 22,5,141,45,208, 
141,46, 208, 169,170, 141, 18,208, 76, 108 
150 DATAZI4,201,221,175,57,173, 9,4, 141, 
154,144,150,42,103, 154,144, 153, 4,208 
3140. DATA1LI5,165,247,173,7,4,141,12, 208,1 
57,129 ,141,250,71,169, 130, 141,251, 71 
130 DATA147,133,141,252,71,169,132,141, 
223,71,159,15343,141,255, 71,173 ,,5,4, 141 
310 DATAZSA, 7i, 76,188, 254,201,252,175,1 
3,169,252 ‚141, 18, 208, 157,1,141,34,208 
s170 DATA76, 180,254, 160,15.169,253, 205,1 
9,208,174,251,190,32,208,159,2,180,11 
3180 DATA1TS, 208 ,253,141,32,208,140,23,2 
09,140,29,209,167,45, 141,18, 208 

205 REM ZEIT 

3210 DATAZ04,26,94,208, 35,169, 225, 141,26, 
4,172,7,4,192,204,178,4,200,140,7,4,192 
3220 DATAL79,144,11,1659,135, 192,172, 144, 
=4169,156,141,5,9,172,204,208, 3,140 

3220 DATAZ7,4 

zo MHEM WELLEN 

3240 DATA204,14,4,708,49, 159,9, 141 ,14,4, 
205,15,4,209,17,169,8,141,15,4, 1680, 1& 
See DATALFTZ,27,212 ‚201,128,178,2, 146,24 
0,130,16,4,150,13, 177, 172,153, 192,04 
260 DATAITE, 16,248, 145, 172,56 237 .1644, 
7,1209,133,172 

253 REH BRANDUNG 

3270 DATA204,17,4,200,27,159,9,141,.17,4, 
157,129,141,18, 212,173, 27,212,201,200 
200 DATA144,10,159,129,141,18,212,169,0 
‚141,17 ,4,2068,20,4,208,50,1597,5,141,20 
>20 DATA4,173,18,4,985,237,19,4,141,18,43 
„341,8,212,201,430,175,5,180,255, 140,19 
3300 DATA4,201,54,144,5,150,1,140,19,4,2 
06,21,4,2008,19,159,20,141,.21,.4, 160,255 
>310 DATA1Y3,27,.212,201,128,175,2,180,1, 
140,197 ,4 

315 REH SCHUSSRICHTUNG 

3520. DATA159,0,141,2,220,173,27,4,208,78 
‚08,24,4,208,73,189,7,141,24,4,.175,1 
55350 DATA220,41,0,208,11,172,22,4,192,22 
‚240.4,200,140,22,4,173,1,220,.41,4,208 
>540  DATA9,172,22,4,240,49,156, 140,224, 1 
73,0,220,41,8,208,11,172,23,4,192,22 
3350 DATA240,4,200,140,73,4,173,0,220,31 
„4,208 ,9,172,23,4,2430,94, 135,190, 25,4 
3365 REM KUGEL 1 

3370 DATAL73,27,4,200,5,173,30,4,205,28, 
,200,79,172,22,4,1430,32,4,185,0,145,74 
3380 DATA105,59,141,33,9,172,11,176,80, 13 
2,2,169,22,56,229,2,168,105, 11, 148,133 
+370. DATA180,183,22,145,133, 181,149, 254, 
45,9,4,141,9,4,173,1,220,41, 15,208, 16 
3400 DATA1L73,68,4,208,8,1659,121, 141.249, 
71,141,89,4,56, 174,5, 159,0, 141 89,4, 180 
410 DATASO,173,1,220,41,2,208,2,180,0,1 
75,1,220,41,1,209,2,180,100, 140, 30,4 
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3420 DATAL4O ‚2844; 173, 248,71,201,96, ‚240, 
49, 204,29,4,208,16,169,12,141,29,4, 172 
34 DATA248, 71,192, 128,240 ,4,200, 140,24 
9,71,172,28,4,169,212,56, 249,64, 101,201 
3440. DATA212,208,29,1549,0,131,531,4,173, 3 
0,4,141,28,4,167, 76,131, 238, 71,159,212 
3450 DATALaL. 1% 4, 169, In "141,29, 3 ‚56,176, 
6,141,11,4,229,20,4,173,22,4,141,10,4 
ih DATALFI, ZI, 71,201, 95,290, 172, 
„4,192,12,144,17,172, 31,4, 239, 31,4,173 
5470 DATASS,4,24,115,180,141,10,4,176,24 
‚172,32,4,172,109,175,25,172,31.,4,238, 31 
3480 DATA, 173; 33,4,24, 241,180,141,10,9, 
1765,8,159,1,13,9,4, 141,99 

3505 REM KUGEL 2 

3510 DATALTF,27,4,208, Sr 173,354,4,205, 34, 
4,2089,109, 159, 253, 45, 2,4 ‚141,9, 4.172,23 
3320 DATAS, 140, 38,4, 185,0, 133,24, 105,218 
‚141,39,8,144,8,169,2,12,9,4,181,9,4 
50 DATAIFZ,11,178,8,132, 2,159 ,22,56,22 
2.2,150,105,11,145,133, 192,105, 22,145 
5540 DATA133.183,173,0,220,41,1&,208,16, 
173,8%,4,208,8,159,121,141,289, 71,141 
3550 MTAGP,A,56,1765,5,167,0,141,87,4,16 
0,50,173,0,220,41,2,208,2,1509,0,173 

3260 DATAO, 220,41,1,2008, 2,1209, 100,140, 3% 
4,140,34,4,.173,249, 71,201 ,96,240,59 
3570 DATA2O05,35,4,200, 15,169 ,12, 141,35, 4 
‚172,2497,71,1972,129, 240,4 ,200,140,249 
3580 DATA7I,172,34,4,169, 212.55, 249,64 ,1 
01,201 ,212,208.2#,159,0,191,37,9,173,35 
JE DATA, 141 ,34,4,169,9765, 141,238, 71,16 
9,212,1931,15,4,1597,7,131,39,4,58,.175,6 
Sa00: DATAL41,13, 4,239 ,34,4,173,39,9, 121, 
12,4,173,247, 71,201, 76.240,56, 172, 39,4 
3410 DATALY2,12,144,17,172,37,4,238,37,4 
.173,37,4,29.113,1092,141,12,4,175,24 
3420 DATALTZ,30,4,192,10, 178 ,28,172,37,43 
+250,37,4,173,29,4,24,241,182,141,.12,4 
3530. DATAL73,8,1689,2,13,97,4,141 ,9,4,180, 
254, 141,2,220 

3645 REM SEHUSSKNALL 

3450 DATA150,121,204 248, 71,240,8,204 ,24 
3,711240,3,96, 176,15, 159,127,141 ,4, 212 
34 DATALEF, 0, 141 ,1,212,,58,,175,5, 159,12 
09,141,43,212,157,1,77,90,4,181,90,4,4L,1 
3470 DATA240,5,169,10,1931, 1,212 

3,703 REM KUGELN BEWEGEN 

3710 DATAI73,9,4,41,1,740,17,168,13,6,5, 
141,65,53,132,13,.14,3,141,18,5.36, 176,18 
4720. DATA1LA49,274,14509,45,43,5, 141 ,4,5,152, 
5,15,9,141,18,5,173,9,4,41,2,240,17 
$730 DATA148,13,4,5,141,4,5,152,13, 16,5, 
141 ,15,9,.5,176,15, 1407 ,253,169,45,5,3 
3740 DATAI4#1,5,3,152,495,15,5, 141 ,18,5,1& 
0,5,185,10,4,153,0, 208,155, 16,247 

750 DATAS2,113,143 

38053 REM SCHIFFE VERGEHKEN 

3810 DATAL?72,45,4,192,1,208,44,172,52,4, 
258,53,159,0,32,64,147,48,10,205,,52,4,48 
3920: DATAS,152,0,32,128, 154,172 ,533,4,200 
+3,169,1,532,44,.147,48,10,205,57,4,48,5 
3830 DATALS2,1,32,178,154 

940 DATAL7T2,45,4,172,2, 208,44, 172, 594,4, 
209,5, 1597, 2,32,64,147,48,10, 205,54,4,30 
3530 DATAS,162,2,32,128,198,.172,93, 4,208 
‚3,159,3,32,64,14947,480,10,205,55,4,48,5 
Ser DATAlAZ, 27 Ar 178,155 

Sg70 DATALTZ, 45, 4,208, 44.172,56, 4,200,5, 
159,43,32,64 ‚147,48, 10,205,55,4,48,5, 152 
Bo DATA4,32,120,196,172,57,4,209,5,169 
3452,64,147,48,10,206,57,4,48,5 

3870 DATA182,5,32,128,156,172,353,4, 208,5 
167,3, 141, 45, a, 206, 25,4 

4003 REM TREFFER ERKENNEN 

“0610 DATA1L73,249,71,201,125,208,758,173, 3 
4,4,24,105,49, 168, 169, 197, 133, 154,142,2 
4020 DATA197,52,4,18,23,172,42,4,37, 156, 
240,16, 222,60,4,208,11,189,20,157,32,4 
4030 DATALOF,45,4,32,121,145,189,55,4,14 
25,173,434,49,37,154,240,16,222,553,4, 208 
4040 DATAIL,189,209,157,55,4,189,49,4,532, 
121,145,70,1565,70,156,202,15,195 

2050. DATALTZ3,2368,71,201,125,208,75,173,3 
0,4,24,105,49,169,159,192,133, 155, 162,2 
4050. DATALBP,.52,4,15,23,173,41,4,37, 156, 
244,16,222,565,4,205,11,189,20,157,52,4 
4070 DATALBF,46,4,32, 64, 144,187, 535,4,18, 
>7.173,83,3.37,.156, 240, 16,222,69,4,208 
4980 DATALL,1697,20,157,35,4,10497 ,49,4,32, 
64, 144,70,158,70,155,202,18,193 

4090 DATA7A, 188,254, -1 

41095 REM SCHIFFE VERSCHIEBEN 

4110 DATA39332,204,77,4,16,1058,172,708,4, 
191,77,43, 169,14 77478, 4, 141, 78,94, 172,03 
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4170 DATA4,240,18,152,3,173,58,4,431,1,20 
B PL- +32,.1294,135, 54, i Fir u Be 172, 153, IF2 
3130 DATAB4 ‚4,240, 19, 162,4,177, 39,4, 41,1 
+208,6,32,128, 155,38, 176,3,32,172,155 
4140 DATAıT2 ‚Ba, 4,240,18,182,0,173,58,4, 
41,2,208,6, 12, 179,155, 534,176 ,3,32,172 
4150 DATA1SS, i72,81,4,240,18,182, 1, 173,3 
0,4,41,2,208,5,32,128,155,96, 176, 3,32. 
4150 DATAL7TZ,133,208,77,4,15,51,187,1, 18 
1,79,4,172,05,4,240,18,162,5,173, 58,4 
4170 DATA4L,1,208,5, 32,128, 155,56, 176,53, 
32,.172,155,172,87,4, 240, 19,.152,2,173,58 
100 DATA4,#L1 ‚2,208, [2 p3 32, 129,155, 55,174; 
3,32, 172,195, 204,87,4.240,1,96, 169,3 
41590 DATALS1,07,4,1469,1,172,54,4,200,140 
„84,4,192,1,208,3,141,82,4,192,120,208 
4200. DATAS3,141,681,4, 192,200, 208,3,141,90 
„4.192,30 ,208,3,141,85;:4, 192,170, 209,3 
4210 DATALA4L, 84,4, 192,230, 208,3,141,05,4 
A 
4220. DATA3Y008,32,216,155,177,170,58,225 
„1,145,170,176,6,155, 156, 55,140,12797,168 
47230 DATA7O, 155,156, 16,256, 200,5,135,177 
‚170,201,271,208,11,145, 155,32, 168, 240 
4240 -.DATAS, 1695, 2,32,64,147,96 
4250 DATAS2,21&,155,177,170,24,105,1,145 
‚176,.144,6,155,155,55,158,129,158,70 
4240 DATALSS, 1365,16, 236,200,5, 156, 177,17 
0,201,88,208,11,169,155,533,159,249,5 
4270 DATAIS5,2,32,44,197,74 
4250 DATA1F4,2,189, 100,154,137,170,187,1 
12,155, 133,189,169,9, 133, 171,153 
4270 DATA159,187,106, 156,133, 1565, 162,0, 1 
Fe Ba | 
5005, REM TABELLE 
5010. DATA40000 , 253,125, 253, 125,253, 125,0 
‚129,0,128,0,128 
5020 DATAB4 55, 
5030 DATA&4L, 169, si, 189, 451,1897,54, 192,54, 
1972,654,192 
5040 DATASS, 55,56, 54,67,67 
5030 DATAO,2,%,10,12,14,8,32,128,8,42,12 
8,5,5,6, 16,14, 14,1 
5105 REM. SERÖLL 
Ssı1ıo DATASOOHA, 109,54,156, 133, 188, 189,76 
135, 133,167, 103 ‚94,156, 155, 171,187,70 
120 DATA1S&, 1323, 170,160, 52,177,160,1453, 
170, 136,16,249,160,2, 189,0, 145,170, 126 
5130-DATA16,251,187,02,156,135,168,189,9 
4,156,133,157,187,88,156,133,170,18% 
“140 DATAF4,156,133,171,160,62,177,160,1 
45,170,136, 16,249, 150,2, 169,0, 145,170 
Ssiso DATA13&,16, 251,94, =1,-1 
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10. REM 
11 REH 
12 REM 
13 REM Gr 1784 T- LAMPE 


104 ı 

105 REM DATEN EIHLESEN 

10% 4 

LLO PRINT"{GLEAR}":POFESS „58: POKESZ, 58: P 
0r.E33280, 2: POKESF23281 ,Z 

126 PRINTTABIZSSISPCI23S1I"CHNITEIBITTEIS 
PACEHEINIGECSPACEIHIHUTENGSPACEIGEBULDEE 
FACE!" 

130 AEADA: IFA=-1 THENEND 

140 READB: IFB=-1 THENC=H:GOTOL FO 

150 POKEA+C ‚BiCc=C+i:G07T0140 

200 POKE43,0: POKE44 , T2ı POKE45 „0: POKE4AG, 1 
b0: SAWE"F",)1,1:5Y844738 

ioo1 ı 

1002 REM MASCHINENFROGRAMA 

1003 1 

1005 REM START 

1010 DATA40192,75,64,142,159,0,1941,24,21 
2.141,24, 208,150,5,153,0,5.,136,15,250 
1920 DATA159, 11.141,17, 200, 32,593,78,1657, 
129,133,172,149, 132,133, 173,160, 71,185 
1056 DATALSF, 139, 153,0,4,1364, 14,247 „175, 
27 ,212,31,1,24, 1067,58,4,141 ,58,4,159,5 
1040 DATA133,1594, 185,1, 32,64,197,178,1 
5,.15,247,159,95,141,248,71, 141, 249,71 
10506 DATAZ2, 10%, 144,157,11, 32,0, 142,150, 
0,152,148,140,20,3,142,21,3,32, 192,157 
IO60 DATA1L59, 177,131, 25,208, 1650, 24,185,1 
72,1433,153,0,212, 1358, 16,247, 172, 7,91 172 
1070 DATAIGS,1494,27,136,190,7,4,172,192, 
174,11,159,135, 192,178, 175, 2,159, 134 
10680 BATAL41 6,4, 1652,30, 32,224, 1494,56, 17 
5,222, 206.27,%,159,8,191,154,2,532,157 
19706 DATA253,32,192,157, 32,251 ,157,175,3 
ı75,64,979,36, 176,254 0-1 

1205 REM KANGNE DREHEN. 
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1210 DATAAOSS4, 172,22,4, 185, 197,144,133, 





no u nn en m 


2020 DATAL&O, is, $2, Sao, 2, 149,9.32,0,148 








‚ 175,152,41,3,159, 185,220, i44, 135, 174 <144> 2,24, 162,16, 160,18, sr 240, 255, 189,10, 32 
1220 DATA1S0.0,177,,174 153,0. 80,200, 1972, | 2030 DATAO, 142, 149,255, 141,2,220,24,162, 
192,209, 246, 172,23,4,185, 197,144, ,133 49 13,160,17,32, 240,255, 32,160, 78,24,162 
1236 DATAL77, 152,31,3, 168, 185,220, 144,13 2040 DATAI&,160,17,22, 240, 235,32, 160,98, 
3,176, 160,0,177,176,153,192,00,200,192 «05 150, 9,185, 25,70,9,84,153,0,131, 185,145 
1246 DATA192,208, 246,94 <20> 2050 DATA7O, 7,64,153,10,131,1365,16,237,1 
| 1305 REM SPIELSTUFE “295 E,ti,lal, 17 ‚208,96 
1310 DATAZ2, 228,255, 201,47 208,75, 172,73 2060 DATAL&9.0,133,2,162,20,32,224,144,2 
„4,200,140,73,4,192,532,144,5,180,49,140 +207> 2,159 255 ,32.220,255.240,247,144,2,192 
1320 DATA73,4,172,73,4,192,99,200,4,159, 2070 DATA1LO,174,24,201,69,144,9,201,91,1 
100,162,10,172,73,4,192,30,209,4,167 745 76,5,32,210,.255,230 2,201 ,32,208,7,157 c65> 
1330 DATA17S,1A2,17,172,73,4,192,51,200, 2080 DATAG4,32,210, 255,230 ,2,201,70, 208, 
4,157, 250,162,29,141,74,4,58,232,50,141 <187> 21,164,2,240,17,190,2,169,197,32,210 <111> 
1340 DATAFS,4,36,235,30,141,76,4,142,72, 2090 DATA2SS.169,72.32,210,255,149,187,3 
4,138,160,11,153,60,4,136 ,15, 250 £193> 2,210,255,201,13,208,1,96,55, 176,180 <15> 
1405 REM ANZEIGE 215» 2100 DATA1459,11,141,17,209,159,0,141,24, 
1410 DATAZO6,71,4,240,3,76,230,158,1689,8 212,141,25,200,32,544,144,159,131,141 32> 
„141,91,4,169,1,77,59,4,141,39,4,208,25 119 2110 DATAZ49,,71,169,127,141,250, 71,159, 1 
1420 DATA120,177,1,6,174,0,5,09,256,4,.6, 29,141,251,71,169,12,32,0,142,160,46 268} 
i 142,4,6,240,5,160,7,140,134,2, 180,10 545 120 DATA185,120,1435,153,0,208,1354,14, 274 | 
5 1430 DATAL3S,78,173,59,4,290,25,120,173, 7,189,14,141,21,200,98,—1 238 > 
3,6,174,2,5,89,236,5,5,142,5,5,240,5 ErrH 22053 REM RANGLISTE £3F> 
1440 DATA1S0,9,140,134,2,160, 25,177, 98,1 2210 DATA23409,160;51,173,27,212,201,120, 
34,997,24,152,4,32,240,295,162,144,58,32 <241> 174,2,.180,0,132,2,169,2,240,29, 160,4 2493 
1450 DATA73,188,32,221,187,157,40,141,0, 2220 DATA185,170,48,153,30,131,1564,16,24 
1,160,5,185,0,1,193,1,1,136,18,247, 173 375 7,160,9,109,0,131,155,20,131,154,14,247 x201> 
1450 DATAT,1,200,240,180,1,167,2,32,30,1 2230 DATAZZ,22,100,185,2,240,29,140,4,18 
71,150,23,162,4,24,32,240,2939,180,8,173 «1545 3,185,658,153,30,131,1364,15,247,160,9 <16> 
1470 DATA7TS,4,205,70,4,141,70,9,240,.2,16 2240 DATA185,10,131,153,20,131,134, 14,24 
0,9,149,134,2,32,210, 258 re 7,32,22,100,155,2,240,170,32,240, 78,74 <2ld> 
1505 REM RICHTUNGSWECHSEL 105) 2250 DATA1L52,7,180,15,32,240 , 259,167, 7,3 
1510 DATA206,25,4,208,69,238,25,9, 182,1, 2,0,142,24,162,21,150,15,32,240,2535,.1497 295 
172,80,4,24,107,81,4,109,82,4, 208,20 <131> 2260 DATAS,32,0,142,16%,11,132,173, 162,1 
1520 DATA169,2,77,58,4,141,539,4,142,52,4 56, 180,129, 134,252,132,293,24,168, 173 ©125> 
‚142,53,4,142,54,4,2068 ,25,4,173,03,4,24 «1243 2270 DATAL&O,10,32,240,755,169,236,133,1 
1530 DATA107,84,4,107,85,4,208,20, 157,1, 72,164,172,177,252,32,210,259,230,172 e1hF> 
77,58,4,141,58,4,142,55,4,142,55,4,142 <240> 2280 DATA48,245,160,19,32,48 142,156, 16, 
1540 DATAS? ,4,206,23,4 130) 250,230,173,230,173,164,173,192,21,208 nr 
1605 REM ZEIT UM hr) 772970 DATAZIS 32,159 255 ,37.220,755,201,1 
1410 DATALFF,27,4,208,72,55,95,150,19,157 47,208,2746,150,4,159,48,153,139, 130,153  <40> 
‚8, 1535,170,215,1565, 16, 250, 24, 150,10,152. «173> 2300. DATA137,130,155,179,150,153,197,130 
! 1420 DATAZ, 32,240,253,167, 64,141, zA,zı2, .155,219, 150,156, 158,250, 160, 7,167,92 70} 
169,6,160,0,152,133,132,292,174, 235, 170 «165 2320 DATA133,145,130,155,166,130,153, 186 
j 1530 DATA240, 18,177, 252,201 ,1,208,3.202, „139,153,204,130,153,224,130,1358,15,238 14233> 
f 240,5,32,45,142,55,176,241,32 44,142 <12> 2330 DATASS, 174, 146 <142> 
1640 DATA1L77,2532,201,1,2008,14, 189, 10,152 2540 ee ee ee 
70,32 224 ,144,56,233,1,200,244,24.,96 <199> ‚133,255,152,0,189,30,131,209,252,208 E12; 
1650 DATA1L62,9,142,134,2, 72,164, 211,32,2 2350 HAFALt: 32,44,142,232, 224.5, 200, 241, 
10,255,24,162,2,32, 240,255, 162,8,1492 2285 Sal rharle ‚144, 10, 152, Pia, Lu Pr ZU 59 233,20 1175 
1650 DATALI4.2, 162, 90,32,224 ,144, 104,32, 2340 DATALSB,56,1765,716, 12372, 170,152, 170, 
210,235, 56,176, 199° 1875 201,100,208,1,76,169,179, 173,252, 169 ©7003 
703 REM TABELLE “14> 2370 DATA219,133,254,15897,130,135,255,133 
1710 DATAO,0,0,0,0,0,136,204, < ron 92,210, ‚233,139,201, 30,240, 30 ‚24.105,20, ı70 car> 
2522104141, 164148041 ulel11,11,1,0,224 <i> 2380 DATA1L50,16,177,252,145,234, 136, 16,2 
1720 DATAL,50, 7,50, 0.0,0,50,7, 50, U; ö, 0,0 47, 165,252,56, 733,20, 1335,252,155,254,55 ©2240} 
‚0,0,0,0,4,0,0,0,0, 2,0, 22 2 253 „135> 2390 DATAZIF,20, 133,254 ‚36,176,221 1bd,l 
1730 DATAZ235, 255 rin 0,0,0,0,0,0, + 0,0,0,0 er 182,0,1897, a 131,133,159, 130,200, 232 250 
aD SOSE OBEN 01019: 0,0,0,0,0,0,0 Car 2400 DATAZ24.5,70B,244 184, 190,162;0, 107 
1740 DATAO,1,0,0,497, 1,7 92H „20,131,183, 195,130, 200,2352,224,10,208 “1743 
005 REH NAME “B7> 2410 DATA244 95, —1,-1 
2010 DATA23192,32,240,98,24,152, 10, 180,1 
0,32,240,255, 169, 8,32,0,142,24,152,13 129 > 


WK-SIMULATION 


Professionelle Grafik - tolle Action 


| Durch Ihr Sichtfenster schen Sie immer nur einen kleinen Ausschnitt der 

Ebene, aufder sich die feindlichen TANKS bewegen, Außerdem werden Sie 
| noch von Flugzeugen angegriffen. Eine wirklich harte Aufgabe! Aber Sie 
| 





können sich modernster Hilfsmittel, wie Radar, llexibles Fadenkreuz, Be- 

schädigungs- und Treibstoffanzeigen bedienen. Ihr TANK Hßt sich in 8 ver- 

schiedene Richtungen bewegen. Um nicht wegen Treibstoffmangels aus 
| dem Spiel eliminierl zu werden, müssen Sie die Treibstollager, die auf'der 
| Ebene verteilt sind überfahren, um deren Inhalt aufzunehmen. 


| Sie werden sehen: das wird kein leichter Kampf! 
Hinweise zum Programm: 

Zuerst muß der erste Teil (Name: a Tank") geladen werden. Nach dessen 
Programmdurchlaufladen Sie den zweiten Teil (Name: "SIMULATION?] 
und startenidiesen ebenso, Haben Sie etwas Geduld? beide Programmieile 
müssen erst:eine ganze Menge Datas einlesen. | 27 
Gespielt wird mit dem Joystick auf'Port 2. Gesteuert wird folgendermaßen: mil den Joystickbewegungen ohne Feuerknopf wird der Tank ın alle 8 
Richtungen über.die Ebene gesteuert, Joystick gach hinten und vorne - mit Feuerknopf —, verstellt. die Areleinnchtung nach oben und unten. 


Leichte Bewegung des Joysticks nach rechts oder links mit Fe uerknopf, löst den Schuß aus, Ein kleiner Tip: man kann den anstürmenden Gegnern 
durch Rückwärtsfahren ausweichen. Doch aufgepaßt! Mit der Zeit werden die feindlichen F Au EeuRe immer schneller! Na dann, VIEL GLÜCK! 


—— = z. zn = = —— —__ EU 


Wir wollen aus einer Mücke keinen Elefanten machen. Aber 
bei Tank-Simulation handelt es sich um ein wirkliches Top- 
proeranım! 
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16 FRINT"CCLEAR DOHNSCHELE INGE PACEI CA 
2. SESPACEIMIN. I CHPACEHTMTATSPACEHFOR SP 
ACE}:":PRINT"IBOEM SPACETITANKISPACRISIM 
LLATIOH" 

25 DIEH (75): FORI=SOTOF 

30 Hiäß+ijel:H (49 el+ iO: NERT 

#6 FORI=27135T0299710: READAF 

50 HeAsctLEFrTE AR, Til LeASCiRIGHTFLAF, 11 
} 

50 DeHiHielä+H il}: S=6+D: POKEI,D 

70 Aeha+tl:1FA{ZOTHENNEXT:A=-1 

80 - READY: 7T=I+10: IFV=SETHENI00 

70 FRINT"EINGABEFEHLERTSPACEIINISPACE +" 
ı10*+ZıEND 

166 IFA<SOTHENGOTOLS1O 

116 G=e9: A=0: NEXT 

120 DATA 7&,AY,7F,80,00,DC,97,01,80,1A,D 
0,47,0%,65,FB,AD,C4,02,80,12, 2422 

150 DATA 00,A7,18,80,11,00,99,24,80,14,0 
3,A7,45A,E0,15,03,508,40,AD,17, 198509 

140 DATA DO,80,17,00,29,01,F0,2F,Cä,FB,1 
0,04,497,03,85,FB,As,FB,E0,03, 2580 

150 DATA: FG, Ib ‚Ab, FB,E0,0[,FO,21,E0,02,F 
0,3B,A&,FB,BD,BF,02,80,21,00, 2915 

150 DATA BD,C3,02,00,20,00,50,C7,02,80,1 
2,00,B8A,F0,6F „69,AB,48,AA,59, 2463 

170 DATA 40,AD,CF,02,60,25,00,AD,CC,02,8 
D,14,209,4C,29,5A,AD,DO,02,80, 2358 

186 DATA 23,00,AD,CB,02,20,14,00,4C,40,&4 
A,AD,D0,02,80,23,00,Ab,£Eb,02, 2373 

176 DATA:80,15,D00,AD,BA,02,C7,02,00,08,2 
0,02,40,97,00,B0,BA,02,AD,BA, 2527 

200 DATA 02,C0C9,04,00,08,20, 297,48 ,A9,00,8 
D,8A,02,A0,B9.02,C9,02,D0,08, 1BB5 

210 DATA 29,0E,6F,A7,00,80,57,02,4C0,430,6 
A,C?,04,00,089,20,23,71,997,00, 1922 

220 IMMTA 00,697,02,4C,%38,65A,AD,CF,0O2,80,2 
3,0D0,AD,1E,DO,2D,F9,02,AD,CE, 2330 

250 DATA 02,00,15,00,RAD,66,02,67,02,F0,0 
3,4C,00,74,AD,E4,02,00,10,00, 2153 

240 DATA AD,EB,02,80,15,00,AD,00,DC,C9,7 
5,00,03,40,25,658,09,77,00,05, 24533 

750 DATA 4C6,25,658,09,73,00,03,46,25,4B,C 
9.74,00,03,4C,70,4C,09,7B8,00, 2333 

250 DATA 03,4C,70,6C,69,77,00,03,40,70,6 
5,46,69,72,AC,EB,02,70,27,20, 2153 

270 DATA DO,03,4C,4D,60,CE,04,00,AD,0A,D 
0,C9,FF,D0,12,AD,E4,02,29,20, 2444 

#50 DATA 00,03,4C,90,68,ADb,E3,02,E7,20,8 
b,E4,02,98,27,40,00,03,4C,71, 2147 

>70 DATA 48,CE,0C,DO,AD,OC,DO,C9,FF,DO,1 
2 ,AD,E4,02,29,40,D0,03,4C,71, 3314 

500 DATA 58,AD,FE4,02,E9,40,80,E4,02,99,2 
7,80,00,03,46,73,5B,CE,0E,DO, 2470 

5310 DATA AD,OE,DO,CF,FF,DO,12,AD,E4,02,2 
9,80,00,07,4C,07,5C,AD,E4,02, 26564 

320 DATA E9,00,80,E4,02,AD,CE,02,C9,D0,D 
0,0A,A7,02,80,8B4,02,A7,D8,80, 2756 | 
30 DATA CE,02,CE,CE,02,CE,D1,02,AD,D1,0 
2,69,00,F0,03,40,23,55,47,04, 2258 

340 DATA 00,01 ,02,AD,CC,02,C9,00,F0,03,4 
C,6A,56,97,09,80,CC,02,A2,00, 254 

350 DATA 80,19,C1,70,18,C1,BD,41,C1,970,4 
0,6C1,80,459,6C1,70,658,E1,EB,E0, 30357 

360 DATA 27,00,E9,AD,65,C1,69,45,00,0%7,A 
2,46,00,49,A9,20,49C0,61,5C0,07, 2584 

370 DATA 48,00,097,A2,4A,A0,48,497,20,4C,& 
1,5C,C#,4A,00,07,42,46,#0,98, 2207 

30 DATA AF,20,40,21,560,07,4C,00,09,42,4 
E04, ,4D,Ac,5l „ac, Er,dE, 2257 

390 DATA DO,09,A2,50,00,40,A7,4F,3C,61,6 
C,C#,50,00,09,A2,32,A0,3E,AF, 239 
400 DATA 51,4C,41,6C,09,32,00,09,A2, 54, A 
0,438,99,53,4C,51,68C,09,54,00, 2369 

Al6 IMTA 09,42,35,%0,48,49,33,4C,51,58C,C 
2,55.,09,09,42,57,A0,58,AF,20, er 

420 DATA 4C,61,5C,92,45,00,47,A9,20,80,5 
F,CI,BE,57,C1;,BC,BF,Ci,CE,Cco, 2665 

430 DATA 02,4C,27,5B,AC,EB,02,98,29,20,0 
0,03,46,95,6C,EE,0A,D0O,AD,OA, 2037 

440 DATA DO,C9#,006,00,16,AD,E4,02,29,20,D 
0,09,AD,E4,02,18,69,20,80,E4, 2259 

450 DATA 02,78,27,40,00,03,4C,B7,56,EE,0 
C,B0,AD,0C,09,C7,00,00,10,AD, 22854 

50 DATA E4,02,29,40,D0,09,AD,E4,02,18,5 
7,40,00,E4,02,98,29,80,00,03, 2031 

470. DATA 4C,D7,5C,EE ,DE,DO,AD,0E,DO,C9,0 
0,00,10,AD,E4,02,27,20,00,07, 2470 

480 DATA AD,E#,02,19,547,80,80,E4,02,AD,C 
E,02,07,07,00,04,A7,CF,BD,CE, 27697 

490 DATA 02,57 ,04,80,BA,02,EE,CE,62,CE,D 








34 HomscompuTer 


= FE 


1.02,AD,D1,02,09,00,F0,03,4C, 2271 
500 DATA -23,58,47,04,80,01,02,AD,CC,02,C 
7,07,F0,03,4C,AC,sD,AF,CF,BD, 2579 
510 DATA EC,02,A2,25,B0,18,C1,970,17,C1,B 
D,40,C1,70,41,C1,BDb,58,C1,°7D, 2491 
520 DATA 59,61,CA,10,E8,AD,41,61,09,4A,D 
0,09,42,48,40,49,49,20,4C,AS, 2581 
530 DATA 50,C07,4C,00,07,A2,4A,A0,48,A9,2 
0,3C,43,50,67,4E,00,09,A2,94C, 2357 
330 DATA A0,4B,A9,20,40,93,50,09,50,00,0 
7 ,AZ2,4E,A0,458,.49,40,4C,A3,5D, 2351 
330 DATA C9,32,00,09,42,50,40,4B,A9,4F,4 
C,AZ,&50,09,54,00,09,A2,52,A0, 2479 
s50 DATA 48,A9,51,40,A3,50,09,54,00,09,A 
2.54,.50,48,49,53,4C,43,50,69, 2457 
570 DATA 57,00,09,42,55,40,4B8,09,55,4C,A 
3,60,C6C9,45,00,09,02,57,10,58, 2374 
530 DATA AY,20,3C,A3,60,A2,45,90,47,A9,2 
0,80,18,61,8E,40,C1,8C,48,E1, 2407 
570 DATA EE,CE,02,40,23,58,02,00,40,Ba,6 
D,EA,EDb,70,C1 ‚cC7,41,D0,FB,E0, 2477 
500 DATA 00,F0,27,A7,41,70,8F,C1,99,42,7 
D,B7,C1 ,90,DF ,C1,A9,43,90,07, 2749 
410 DATA C2,90,2F,0C2,A9,44,70,57,02,90,# 
7,02,99,95,7D,7F ,Cc2,70,CF,C2, 3059 
520 DATA E0,28,F0,36,A49,59,90,70,C1,A9,5 
A,.>0,68,C1,70,E0,C1,A7,58,70, 3100 
530 DATA 08,C2,70,30,0C2,A49,5C,70,38,02,7 
0,68,C2,49,50,7D0,80,C2,90,D0, 2926 
440 DATA C2,E0,24,F0,13,E0,25,F0,0F,E0,2 
7,F0,08,E0,28,F0,07,EB,EB,Ed, 29752 
550 DATA E8B,4C,035,40,50,02,29,CA,BD,Bf,tc 
1,C7,41,00,F8,E0,28,F0,29,997, 3074 
hd DATA 41,.70,90,C1,99,42,9D,29,C1,7D,E 
0,C1,39,43,90,09,602,70,30,C2, 2894 
570 DATA AF,44,70,.59,C02,970,78,C2,49,45,7 
D.,80,6C2,#70,00,C2,E9,00,F0,38, 2971 
&00 DATA AF,57,70,8F,C1,A9,594,70,07,C1,7 
D,DF,C1,A9,58,90,07,02,90,2F, 2758 
590 DATA C2,A9,5C0,70,57,C2,90,A7,C2,A9,5 
D,70,7F,02,90,CF,C2,E0,03,F0, 3176 
700 DATA OF ,EO0,01,F0,0B,E0,02,F0,07,CA,E 
A,ER,CA,AC,S7bE,hO, ACC, BB, 02, 24657 
710 DATA: A2,00,00,01,F0,11,EB,EB,EB,EB,E 
B,EB,EB,EB,B9,402,9E,5E,AY, FC, 335647 
720 DATA 46,C4,5E,A0,00,B0,18,C4,97,E0,E 
7,50,18,C4,29,01,D0,EC,AF,Ad, 2706 
8,02,40,00,E0,10,D0,02,A2,00, 2425 
740 DATA EO,88,00,F4,A0,00,E0,01,F0,11,C 
8,C8,C8,C#a,C8,C8,C8,C08,CA,4C, 3342 
750 MTA DE,HEKAFsFE,4C,04,5F,42,00,B9,1 
8,C4,90,E8,E2,B#,18,C04,29,01, 2573 
ba DATA DO,EC,A7,AB,70,208,E2,C9,EB,E0,0 
B,D0,EB,40,20,97,4E,AD,F3,02, 3117 
770 DATA C9,00,F0,07,CE,F3,02,C7,00,D0,0 
8,20,1D,70,47,03,80,F3,02,AD, 2220 
780 DATA B8,02,C7,02,00,03,40,55,6F ,C9,0 
4,00,03,49C,65,6F,097,05,00,05, =010 
7970 DATA 40,55,6F ,6C9,08,00,03,4C,65,6F,C 
2,0A,D0,03,4C0,55,5F,09,0C,00, 2127 
800 DATA 03,4C,55,6F,,C7,0E,D0,03,40,63,5 
F,C9,10,F0,04,50,A#,FC,4C,B7, 2104 
Blo DATA HF ,AE,17,C4,A0,07,B7,0F ,C4,77,1 
0,64,89,00,F7,BE,10,C04,A2,08, 2547 
B20 DATA BDO,0F,C4,70,07,E2,BD,0F,C4, 29,0 
1,00,06,49,98,70,17,E2,CA,D0, 3020 
E50. DATA EB,AD,B8,02,C9,02,00,03,4C,AF,6 
F,C9,06,00,03,49C,AF,4F,C9,0A, 2361 
840 DATA DO,03,3C,AF,5F,09,06,F0,05,40,A 
9,FC,AC,DisdFf,AE,OF,C4,n0,07, 2499 
830 DATA B89,07,C4,97,09,C04,89,00,F7,BE,0 
8,0C4,92,05,20,07,C4,9D,CF,E2Z, 2834 
[= P- 18) DATA B0,07,C4,29,01,00,DB,A7, AA, 7D,0 
F,E2,CA,DO,EB,AD,BE,02,C9,06, 2807 
E76 DATA FO,OA,CF,DE,FO, 05,60, AF,FC,A4C,0 
1,70, AE,07,04,A0,07,89,FF,C5, 2805 
890 DATA 77,00,C4,88,D00,F7,BE,00,C4,A2,0 
B,B0,FF,E3,70,C7,E2,BD,FF,C3, 3508 
E70 DATA 29,01,00,08,A97,489,70,07,E2,CA,D 
0,EB,AD,00,C4,80,09,E2,AD,01, 2759 
#00: DATA C4,80,07,E2,40 ,AC,EB,02,70,27,2 
o0,D0,00,99,29,40,00,25,70,297, 221% 
710 DATA BO,D0,3F,40,AD,F9,02,C7,00,F0,E 
E,CE,F0,02,AD,FD,E3,£69,19,F0, 3124 
320 DATA E4,C9,1A,FO,E0,C9,18,F60,.DC,EE,O 
B,00,40,25,70,AD,F1,02,C09,00, 2706 
930 DATA FO,D4,CE,F1,02,AD,FE,C3,C9,19,F 
0,CA,6C#,1A,F0,66,6%,1B,F0,C2, 3518 
2406 DATA EE,0D,DO,4C,24,70,AD,F2,02,09,0 
0,F0,BA,CE,F2,02,AD,FF,C3,C9, 3007 
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' 950 DATA 19,F0,B0,C9,1A,F0,AC,C9,1Bb,FO,A 


S,EE,OF ,DO,60,AC,EB,02,98,29, 2975 

750 DATA 20,00,11,798,29,20,00,06,78,79,8 
0,00,04,40,4C,FD,70,3C0,5C,71, 2077 

#70. DATA AD,FD,C3,C7,1C,F0,29,09, 1F,Fo,2 
4,09,17,F0,20,AD,F0,02,09,13, 2771 

980 DATA DO,20,CE,FD,C3,A9,01,60,F0,02,A 
D,FD,C3,C9,1A,F0,CA,C9, 18, F0, 3205 

770 DATA C&,CE,08,00,46,75,70,AD,F0,02,C 
7,0A,F0,19,EE,F0,02,AD,FD,CH, 2949 

1000 DATA C9,17,F0,AF,C9,1A,FO,AB,C9,ıB, 
FG, A7TJCE,0B,DO,4C,97,70,AD,EB, 3082 

1010 DATA 02,E9,20,80,EB,02,4C,73,70,AD, 
FE,E3,C9,IC,FO,40,69,1F,FO,3C, 2667 

1020 DATA C9,19,F0,38,AD,F1,02, C?,13,00, 
19,CE,FE,C35,AT,01,80,F1,02,AD, 27753 
1039.DATA FE,C5,C9,1A,FO,2C,C7,1B,F0,28, 
CE,0D,DO,4C, aE,TL,EE, Fi, 02, AD, 2316 

1040 DATA FE, C3,09,17 ‚FO, 18,09, 1A,Fo,i4, 
C9,18,F0,10,CE,00,00,4C.4E,71, 2604 

1050 DATA AD,F1,02,09,09,F0,0&,4C,2C Ti, 
4C,78,70,AD,EB,02,E9,40,8D,EB, 2529 

1080 DATA .02, 4C, 2E,71,AD,FF,G,CP,1C,F0, 
SC,C9,,1F,F0,38,09,19,F0,34,AD, 2640 

1070 DATA F2,02,69,13,00, 17,CE,FF,C3,#9, 
01,80,F2,02,AD,FF,C3,C9,1B,FO, 2997 

1080 DATA 10,C9,1A,F0,19,CE,0F,00,40,EE, 
F2,02,AD,FF,C3,C9,17,F0,0B,6C9, 28297 

1090 DATA 1A,F0,07,09,18,F0,03,CE,0F,Do, 
&0,A0,F2,02,0C9,0A,F0,04,4C,8%, 2334 

1100 DATA 71,60,AD,EB,02,E7,E0,ED0,EB,0Z, 
&0,20,7%7,5E,AD,F3,02,C9,03,F0, 2811 

1110 DATA OA,EE,FS,02,AD,F3,02,C09,03,D0, 
08,20, 60,70,47,00,80,F3,02,AD, 2742 

1120 DATA 88,02,09,01,00,03,4C,00, 72,07, 
03,00,03,4C,00,72,C9,05,00,03, 1837 

1130 DATA 4C,00,72,C09,07,00,03,40,00,72, 
C9,07,00,07,4C,0D0,72,07,08,00, 1069 

1140 DATA 03,4C,00,72,C9,00,00,03,4C,0D, 
72,C07,0F ,F0,04,60,49,FC,4C,31, 1938 

1150 DATA 72,AE,10,C4,A0,00,89,11,04,99, 
10,C4,C8,C00,07,00,F3,BE,17,C4, 2656 

1159 DATA A2,08,20,0F,C4,90,07,E7,BD,oF, 
C4,29,01,D0,09,49,A8,90,17,E2, 2778 
1170 DATA CA,DO,EB,AD,BA,02,C9,01,00,02, 
46,37, 72,09,05,00,03,46,59,72, 2392 
1180 DATA C7,07,00,03,46,539,72,09,0D,F0, 
08 60,09 FO HA, FETT NEO. 7359 

1190 DATA A0,00,09,07,C4,97,08,C4,C9,C0, 
07,D0,F5,BE,OF,C4,CB,B7,07,04, 2700 
1200 DATA 77,CF,E2,87,07,C4,29,01L,00,DM, 
A? ,AB,?7,0F ,E2,808,D0,EB,AD,Bo, Z107 

1210 DATA 02,C69,05,F0,04,07,00,F0,04,60, 
A?,FC,4C,B6,72,AE,00,04,A0,00, 2337 

1220 DATA 87,01,C4,77,00,C4,C8,C00,07,00, 
FS,BE,07,C4,C8,BF,FF,C3,79,C7, 3115 
1230: DATA E2,BF,FF,C3,27,01,00,D4,A?,Ad, 
79,07,E2,88,00,EB,AD,00,C4,80, 3141 

1246 DATA 08,E2;AD,01,C4,80,09 ,E2,60,AD, 


-89,02,C9,00,00,52,AD,00,DC,C9, 2821 


1250 DATA 7A,D0,03,4C0,E5,72,C07,7E,D0,03, 
46 ,E3,72,09,75,00,17,A9,02,8D, 2571 
1250. DATA B9,02,A0,88,02,07,10,00,05,99, 
00,80,88,02,EE,E8,02,40,22,73, 2121 
1270 DATA C9,79,00,03,4C0,0E,72,09,70,D0, 
03,4C,0E,73,09,73,.00.14,AD,b8, 2383 
1280 DATA 02,C9,01,00,05,A9,11,00,B8,02, 
CE ,B9,02,A7,04,80,B9,02,CE,DB, 2248 
1290. DATA 02,AD,DB,02,09,00,00,42,A2,30, 
BE,DB,02,A0,70,00,07,.39,F0,0&, 2457 
1300 DATA EE,70,C0,40,5E,73,8E,90,C0,AD, 
BE,CO,C9,37,F0,04,EE,BE,CO,4C, 3012 
1310: DATA #E,73,6E,BE,C0O,EE,80,C0,AD,ErF, 
02,C4,01,F0,03,CE,EF,02,AD,BD, 2872 
1320 DATA C0,C9,34,00,09,BE,BE,CO,BE,BD, 
CO,BE,70,60,AD,00.02,09,03,F0, 2937 
1330 DATA 03,EE,0D,02,EE,DE,02,AD,DE,02, 
C4,02,00,0F,A97,00,80,DE,02,AD, 2664 
1340 DATA DA,02,C7,20,F0,03,EE,IA.072,A9, 
SE ‚ED,2F ‚CO,80,57,00,80,7F,C0, 2677 
1350 DATA 80,47,C0,00,44,C0,80,4E,C0,BD, 
95,60,200,BE,C0,AD,15,00,C9,1F, 2986 
13560 IMTA FO,25,A9,0F ,ED,2ZF,C0,8D,45,C0, 
A?,02,90,57,C0,00,8E,0C0,A7,0A, 2537 
1370 DATA BD,7F ,CO,80,75,C0,47,2E,80,A7, 
CO,8D0,BE,C0,A9,03,40,09,73,49, 2930 
1380 IMTA 08,00,2F,08,00,45,09,80,37,D8, 
B0,6E,D8,ED0,7F ,DE,ED,74,D53,BD, 7882 
1370 DATA A7T,DE,#0,BE,DE,AD,EE,02,C9,00, 
FO,OA,CE,EE,02,AD,EE,02,C9,00, 28954 
1200 DATA 00,09, ,AD,EF,02,8D,,EE,02,20,1D, 
70,EA,EE,FA,02,AD,FA,02,09,08, 7546 
1410 MTA FO,0%,4C,A1,74,49,00,80,FA,02, 
20,44,74,AD,FC,02,80,18,D4,A9, 2443 
1420 DATA SA,ED,05,04,80,00,04,090,13,Ds, 


AF Ar, 8D,06,04,80,00,04,8D,14, 2415 
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1430 DATA D4,549,01,80,02,D04,80,09,04,A2, 
02,BE,10,04,50,03,D4,8E,0A,04, 2353 

1440 DATA. AY,05,80,11,04,A9,40,00,04,D4, 
80,01,D4,80,12,04 ,EE,FB,02,AD, 2523 

1450 DATA FB,02,C9,C0,00,05,49,00,B0,FB, 
02, AE,FB,02,00,00,98,80,01,04, 2544 

1450 IMTA BD,00,97,80,00,D4,BD,00,9A,ED, 
OB,D04,80,00,75,80,07,D4,6D,00, 2292 

1470 DATA 9C,90,0F,04,00,00,7D0,0D0,0E,D4, 
A7,41,00,04,04,00,00,D4,50,12, 2331 

1480 DATA D4,40,31,EA,AS,C4,C9,00, DO,01, 
40, A? ,00,85,C6,AD, 77,02,69,2B, 2478 

1490. DATA FO,05,C7,20,F0,0D,&0,AD,FC,02, 
E9,0F ,D0,01,60,EE,FC,02,50,AD, 25349 

1500 DATA FC,02,C9,00,D0,01,50,CE,FC,02, 
40,89,99,A2,C0, 19761 

1510 FORX="832T0865: READO: POKEX „OrNEXT: PO 
FEAPA, I: POREFEI „Bi POKE753 ,0: POKETA2,0 
1320. DATAL20,1659,51,133,1,169,0,133,95, 1 
33,#0,137,88,169, 205,133, 76,159 240,133 
1530. DATASF „159,224 ,133,91,32, 191, 163,14 
2,35,133,1,88,94 

1540 SYS5832: POKEBSO , 140: POKES4376 ,„PEEK (5 
65761 ANDESS:POKESSZTZ  B: PORE 440, 192 

1550 PRINT"L DOHHS SPACEFIVOLLSPACE 
IARETSPAGCEIGDING CSPACEITOCSPACEIENJON SP 
dcE2}: "1: B=57344: POKET754 ,8O 

1560 PRINT“ CDONNE SPACESYTESPACEIATSPACE 
INESPAGEIKTSPACEZISESPACE) TCSPAGEIMESPAC 
BHUESPAGEILISPACEHALSPAGEYTISPACEI LS PAR 
EIDLSPACEIN" 

1570 PRINT" CDOWNNI SPACESIBLSPACEIVTSPACE 
ATLESPACEIHESPACEIDTSPALEIMTSPACEIATSPAG 
EISTSPACEFINTSPACEIALSPACEIRESPÄCEI N" ICH 
R#Ei142); CHRE I 

1500 READZE: IFIE=-1I THENSOTOLBZO 

13990: FORT=0T07: READO: FOKEB+ZE#8+T „Di NEXT 
:G0OT01580 

1600 DATAGS,255,170,252,168,252,1408, 232, 
158 

16510 DATAGA ,232,252,168,16589,252,232, 168, 
168,67, 252,252, 252, 292, 168, 168, 168, 168 
1620 DATAAB 237,252, 232, 2u2 252 .72532,.232, 
252,69,140, 159,160, 160, 168, 160, 158,168 
1450 DATATO 42,192, 240 ,236,255,255 71,20 
5,254, 23519 DIT ET LIEF Bands 
1540 DATA242,73,235, 171,255 255,751 ,235, 
259,239, 74, 44,34, 15,63, 187,255 

1650 DATAFS „233,234 ,255,219,255,191,255, 
231, 76,1163,254, 191 „255, 294 233,77, 
18540 DATA,yn11,13,78,63,253,255,237,255, 
255,191 ,259, 79, 44145,21,75,251,127,60 
1470. DATA2EE 21 2 2 2 2 25,19 
‚981,3,05,05,117,05,02,213,121,82,247 
1580 DATA2SS, 235, 219, 235, 235, 2, 
‚54,280,84,05,85, DS, 92, 94 ,213,257, 247, 2 
1490 DATAZIF 235,253, 21 Syn nn6d, dd, 5 
466,55, 65,247, 127,237, 127 ,253.234,07, 
1700. DATAS4, 92,237, 235,239 ,255,187,88, 25 
a 2 2 23 23,233, 1971 ,07,255,170 
1710 DATAZSS, 170, 255, 170, 255, 170. Mo 255, 
224, 170,170,235 ‚255,170, 170, Ti Pe Pr =" 
1770 baTazss, 2u44170,.170, 170, 170,72,255, 
255 , 255,255 255,255 ,255 ,295,93,170,170 
1730. DATA170,170,170,170,170,170,94,160, 
160,.,8,34,8,,150,75,160,1&0, ,11,1,4,6,76 
1740 DATAS, 15,59, 76,,3,,3,97,80,132,1,1, 
‚51,,12,98,4141+84,66.,64, 16,16, 79, 1&,16,1& 
1750 DATA24,54,54,64,75,100,48,,12,,19%5, 
154101 ,63,12,204,247,17,48,192,.129,102 
1760 DATA4,32,1968,94,1,1,7,1, 103 ,83,67 58 
Farin nl 105,120, 
1770. DATA,,12,44106,1,1,1,9,4,4,4,43,107, 
ln, 10, 75,5, 
17B0. DATA, 1,„9?,4,80,110,1434,15,54,72,2,8, 





# 

17970. DATAL11,150,175,,8, 34,15, 4160, 112,1 
50,240,,8,34,248,,150,43,32,32,32,34,17 
1800.DATAL7,10,4,452,4,93,9,58,134,134,00, 
32,41,,8,60,72,136,15,16,32,40, ,192,60 
1810. DATA18,17,8,8,4, +1 

18209 FORI=ST042: POKETFF143#+1 FE: NEIT 

1830 FOoRi=1T01 7STEPZ: FPOKETTIB3#H [IH 11 72,4 
F+I:FOREIST/IFPIHEI HI 72, 69T 

1840 POKES7203+ (1#+1) 72,594 1: POKEST21I+CI 
+11 /2,69+LENERT 

19509 PFOKESFEZ3, 87: POKE37213, 87 r POKEIS7203 
„B7:POKEI71F3,87 

1650 FORI=OTOSOSTEFIO: POKE3ZFT224+1 , Ti: POK 
E37225+1, TI: POKESTISB+1, 77 

1870 POKEFTZTEFHT Bd: FÜRLU=O TO: PORETTITA+ 
Url, 75: NEXTU:POKES7149+1,77 

1680 FIRE37150+1,B1:FOKEF7T1S1I+1, 85: PORES 
7152+1 ,85:NEITI 

1890 FORI=0T0395T1TEP8: FPOKESTZES + I, BF: POKE 
et Br POKETF2uA+ 55 
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2750 DATAZE 444604 20 192205 














1900 POKES7247+1 ,BF:NEXT ib ! a. 

1710 FORI=OTO7SSTEP4: POKES7304+1 56: POKE tt „1175 

37584+1,57: POKE3S7305+1, 70 <154) 2260 DATALZ7,128,2, 4,68,9,2,32,24,1,24,3 

1920 POKEITIOG*+L 90: POKEST3SBS+T,F1:POKES 2,127,196,127,129,82,32,1,8,48,2,8 26 

F2B&+1,91: POKES7387+1, 91: POKES7307+1,90 «203 2270 DATAS,2,40,3,2,44,,132, 129, ,105, 1,2 

1730 NEXTıFORI=OTOSFSTEPA: POKESFAG4+T 58 4,47,231,,298, 64, 224,127 ,129 292, 1254 “22B> 
:POKETTSOM+T, 69 <> 2280 FORI=OTOLFZ:PORESIS2B+1 O0: NEXT:POKE 

1940 FORU=0T02: FORT=OTOBOSTEPGO: POKES746 31356 „St: FOKES1 357,96: FÜRES1 362,58 z1133 

S+ 141471 „924 POKEITS03+14U+T , 95: NEXTT 2184> 2270 DATAEELB AO 2A TE 

1950 NEXTU: POKE37S544+1 „CO: PÜOKEITSEM HT 69 9, 4,1659,32,7115,128, „24,54, ,164,8,,74 1585 

«NEXTI ‘B0> | 2300 DATAS, ALT tern 

1940 FORI=0T0237: POKESLBA44+1 „FA: FOKEI7A2 er Pr 8,,,128,1,64,192 <1d4> 

A+1,T4ı NEXT <aa5 2310 DATA1975,21,18, 144,,64,,32, 130,192,2 | 

1770 DATA235,170,255,170,255,170,235,170 ‚202, ,,84,96,102,54, „130,202, 100, ,109, “1583 
255,255,170,170,235,255,170,170,255 “1635 2320 DATA1,73,192,32,148,28,17,34,68, ,54 | 

jHB0 DATAZSS , 255, 255,170,170,170,170 Eill> ‚8,2,12,2, 136,80, 32,146, u 1,11, 120 <“218> 

1970 FORISOTOZT:READK:POKESOLTE+T „KıNEXT 2330. FORI=ÖTOZ1STEPS:READX: POKESLALI+T,X 

:FORI=OTOGS: POKESO200+ 1,253 <123> ıNEXT:FORI=OTOL1F:READX: POKES146I+1 ,% an 

2000 POKESOS | KTılle =1T07: 2335 NEXT <170> 
TS 170 nn a Tr 2340 FÜRE7i 1,2067: POKE?712, 10 I: FOKE?71 3,31: 

2010 POKESOZF2+T+U,235:NEXTTıU=LHBINEXTI <108> FORESF7 „0: POKES#FF „0 a 

2020 FORI=OTO2Sı POKESOAFZHL,O:NEXTSFORI= 2330 POKETON 211: PDKE7O8, IST FOREFUS LEI FU 

OTO?28: READY: POKESOASB+I „X: NEXT 6333 KE713,21S5: POKE716,215: POKESFB,0 <103> 

2030 DATA1S, „3,253, ,63,87,15,245,117,253 2360 POKE709,11:POKE710,7:FPOKE707 ,ZIFOkKE oO 
‚73,85,746,85,85,09,04,167,185, 155,85 21i0> Eee erpieeherekiren “2327 

2040 DATABS,05,117,09,89,87,102,102,105, 2370 FPRINT"ICLEAR CYAN DOWHE SPACEFYEIKD 
09,89,124,03, 83,172, unnne0 001 AD 121170, %119 GUN LEFTZI@+SPACEIARKIMSTSRACEIFRODUCTI | 
200 DATA10,170, ,233,106,14,85,106,248,1 ONSSPACEIPRESENTE: " | | | 211) 
19,170,214,105,158,89,86, 160,85, 218,128  <97> 2380 PRINT“CHNITE DOWNG SPACESITESPACENA | 
2050 DATABY,65, ,149,109,,101,192,,87,,,7 ISPACEINISPALCEIETSPACESISCSPACEITISPACE) 
TE FE EERECEEBEREEEEER 110) MISPACEHIESPACEILESPACEIALSPAGEITESPACEN A i 
2070 DATAAQ,,„170,128,,170, 1&0,,174, 107, IESPACEIDISPACEIN" “228? 
‚159,85,176,170,157,95,42,229, 131,10 «1755 23970 PRINT"IBLACK DOHNT IWRITTENIE E 
50B0 DATAL49,117,2,167,95, „149,101,,57,8 PACEJANDESPACEISTYLED{SPAGE) BY ESPACE) “1187 
RE E13 2400 PRINT"IDOHN SPACEITLISPAGCEIHISPACEIDO 

2099 DATA, urn! TSRACEIMLSPACEIATSPACEISTSPACENINISPACE) 
27 ,192,,213, 252, ,93,95,240,85,117,127 “48) ATERACEIRTZRACETKISRAGESITEBEACEINSSRACE es ' 
2100 DATABS,B5,157,134, 149,85,85,70,90,9 - BILLSPACEITCERACKIBCSEACEIG Bar E 4 
3,85,85,101,101,101,217,153,153,125,101 <85> 2410 FORI=0T019771NEXT | nn 

2110 DATAIOT.T.os,0n <250% 2420 A=PEEK (56320) : IFAC>LLIANDA<>1IOAN de 
120 DATA lbs öl 1 CH LOFANDAC >LOTANDAS>LOSTHENZAZO See 
6,128,,,128,,112,128,,684,120,252,60,86 *100> ee nn eher Ä “u... (150> 
2150 DATAZ A nn 2440 REMMR ik eos L 
vlöysanusibnunibrn26,,1,60,120,18,23  KIZE> rrlnaes SE 
a ae re ae 2425 2470 REM O WRITTEN BY: *  <185) 

2150 FORI=0T082: READXı POKESOGRB*I „X: NEXT ZAN Eree ee 
:FORI=OTOS7S: POKESOTS2+1 ,O:NEXT <255> 2490 REN® | ! En | 

2135 POKES14B3 57: POKE32SSB,31:POKES2562 ZONE REHR.SISTER ITISRE BIER Ar a ” 

‚321 POKES2563,33 <170> 2510 REN® | * a 

2150 POKESO7GO, 24: POKES07B3 25%: FORI=0T0 2320 REM# WEILCHENSTR. 56 he 

9: READX: POKESORA1+L, Kı NEXT:FORI=0T012 244 > 2330 REH® | * 763 z 

2170 READX: POKESOFO2+1 XıNEXT <214> 20 REM 4370 MARL her 

2180 DATASO, „3,243, ,,52,128,,177,192,,20 2550 REM# A ene 
7,64,1,255,128,,129,126,.254.31, 1417 <b7> 2360 REN® Y w Sa0 Fr 

2190 DATAL29,255,252,192,7,1370,150,,126, 2570 REH* TEL.ı 00345’ 82722 . *228> > 
60, „64 ,40,3,295,254,12,112,34,95,150,38 {214} 2380 REM« - #127) cap 
2200 DATAL2O,16,170,755,128,52,64,127,23 che nel ee | 
2,32, .80,28,.96,3,224,192,,31,128 <108> 2400 REI a 
2210 PORESOF7S, Sb: POKES0978 ‚24: POKESOFG1 2610 REN MUSIC COMPOSED BY: .  <1B92 vi 
‚SO: POKESOFG4 ‚Söı POKES1170,24 <iF1> 7420 REH® | , “ «167 | 
2220 POKES1173,60:1POKES117&,Z41POKES117F 2630 REH® CHRISTIAN HIKL Wa |: 
‚S6: FORI=OTOZ1:READX:POKESLOSS+I,X:NEXT <185> 2640 REN® RE sc 
2230 FORI=0T045: READX: POKESLOBB+I,X: NEXT | 2450 REN a th, zu 
: FORI=OTO24: READK: POKES1222+1 ,Xı NEXT 21963 2660 RENennnnnnunnunennannnunnunnnee ne 115, Re: 
2240 FORL=-OTOS4:READK:POKESIZTL+I,XINEXT ©2075 a3 
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Fortsetzung von Seite 5 


alleemein gesagt, die Eingabe von Daten 
in ein Programm. Das readin, das wir be- 
nutzt haben, unterscheidet sıch von read 
nur dadurch, daßbeireadin (In=line) der 
Cursor in die nächste Zeile springt. Durch 
readin (bzw. read) wird der Proerammab- 
lauf unterbrochen und der Benutzer be- 
kommtdie Möglichkeit, über die Tastatur 
eine Zahl einzugeben. Das Ende der Ein- 
gabe wird durch Drücken der Return-Ta- 
ste erkannt und die eingegebene Zahl 
wird der Variablen „radius” zugeordnet. 
„Radius“ hat jetzt den Wert, der eingege- 
ben wurde (z.B. 6.50). Das was ausgege- 
ben werden soll, muß immer in einer 
Klammer hinter readln bzw. hinter read 
stehen. 


Zeile 7: kreisflaeche:= radius * radius * 
Pi; 

In.dieser Zeile wird gerechnet {die Slern- 
chen sind das Multiplikationszeichen). 
Das, was in dieser Zeile steht, nennt man 
eine Zuweisung (auch wenn die Zeile ei- 
ner mathematischen Gleichung ähnlich 
aussieht, ist es keine). Die Zeile wird fol- 
gendermaßen bearbeitet: Zuerst wird der 
‚rechte Teil der Anweisung ausgewertet. 
In unserm speziellen Fall bedeutet das, 
daß der folgende „Ausdruck“ berechnet 
wird (Bsp. für Radius: 6.50): 6,50 * 6.50 * 
3.1415926. Im zweiten Schritt wird dann 
das Ergebnis dieser Rechnung 
(132.73228735) der Variablen „kreisflae- 
che“ zugewiesen. Das Zeichen „;=* nennt 
man Zuweisungssymbol. Jetzt enthält dıe 
Warıable „kreisflaeche* den Wert 
132. 73228. 


Zeile 8: writeln('Der Flaecheninhalt ist: 
'kreisflaeche); 


Writeln unterscheidet sich von der Proze- 
dur „write” nur dadurch, daß der Cursor 
in die nächste Zeile bewegt wird. Interes- 
santer ist, was in der Klammer ist. Zu- 
nächst steht da ein Text in Anführungs- 


zeichen: "Der Flaecheninhalt ist: *. Die- 
ser Text wird so auf dem Bildschirm aus- 
gegeben. Danach folgt ein Komma. Die- 
ses Komma wirkt als Trenner zwischen 
verschiedenen Teilen (ganz analog zur 
Variablendefinition in Zeile 3), die ausge- 
geben werden sollen. Nach dem Komma 
kann jetzt etwas Neues aufgeführt wer- 
den, ın unserer Fall die Varıable „kreis- 
laeche*. Dadurch, daß „kreisflaeche“ oh- 
ne Anführungszeichen geschrieben wur- 
de, wird jetzt nicht das Wort „kreisflae- 
che* auf den Bildschirm geschrieben, 
sondern „kreisflaeche“ wird als Variable 
erkannt und der Inhalt der Varıablen wird 
auf dem Schirm ausgegeben. (Anmer- 
kung: identisch zur Zeile $ wäre die Pro- 
erammzeile: 

writel’Der Flaecheninhalt ist: ’); 
writelnikreisflaeche); 


Zeile 9: END, 


Das END beendet den Anweisungsteil. 
Der Punkt ıst sehr wichtig, weil er, nach 
dem „END“ stehend, das Programmende 
anzeigt, 

So, das war das Programm. Wenn ihr es 
jetzt eingegeben habt, geht aus dem Edi- 
tor heraus (Cirl-K-D), speichert das Pro- 
gramm ab (mil „s“) und laßt es mallaufen 
(mit „R*). Zunächst wird es automatisch 
compiliert, Sollte der Compiler einen 
Fehler melden, habt ihr wahrscheinlich 
einen Tippfehler begangen. 

Wenn ıhr das Proeramm einmal laufen 
laßt. dann seid ihr vielleicht mit uns der 
Meinung, daß es ein paar Schönheitsfeh- 
ler hat. Zum einen steht über dem Radius 
noch „Runnine” und der ganze Text der 
Compilation. Zum zweiten sieht das Er- 
gebnis reichlich merkwürdig aus. Bei 
dem Ergebnis hat das damit zu tun, daß 
„Pascal“ jede „real“-Zahl (Dezimalzahl) 
in Potenzschreibweise mit 11 Stellen aus- 
gibt. Diese zwei Schönheitsfehler lassen 
sich jedoch relativ einfach beheben. 
Geht zunächst wieder in den Editor (mit 
„EF“). Andert Euer Programm jetzt so ab, 


daß es folgendermaßen aussieht: 


l: PROGRAM Kreisberechnung_?; 

2: CONST pi = 3.1413926; 

3: VAR radius, kreisflaeche : real; 

4: BEGIN 

5: elrscr; 

6: write('Radius: '); 

7 readIntradius); 

5 kreisflaeche:= radius * 
radıus * pi; 

gr writeln('Der Flaechenin- 
halt ist: '); 

10: writelnekreisflaeche:10:2]; 

il: END. 


Denkt beim Ändern an die Editorbefehle 
Cirl-N (für Zeile einfügen), Cirl-Y (für 
Zeile löschen), Ctrl-G (für Zeilchen lö- 
schen) bzw, eine entsprechende Lösch 
(-Delete)-Taste bei eurem Rechner. 
Folgendes hat sıch geändert: 

Zeile 3: clrscr; 

Diese „elrser“ ist eine Kurzform lür 
„Clear Sereen“ (Bildschirm löschen) und 
ist eine sogenannte Standardprozedur, die 
von Turbo-Pascal zur Verfügung steht, 
Sie bewirkt folgendes: Sie löscht den 
Bildschirm und plaziert. den Cursor in die 
linke obere Ecke. 

Zeile 10: writelnikreisflaeche:10:2]; 

Neu ist hier, daß hinter der Variable 
„kreisilaeche* folgendes steht: „;10:2° 
:10 bedeutet: | 

Die Zahl, die für Kreisfläche berechnet 
wurde, wird rechtsbindig so ausgegeben, 
daß die letzte Zifferin der I. Spalte steht. 
Es werden also links entsprechend viele 
Leerzeichen eingefügt. 

:? bedeutet: 

Die Zahl (die vom Typ „real“ sein muß) 
wird mit 2 Nachkommastellen ausgege- 
ben. 

Wenn ihr das Programm geändert habt, 
dann laßt es nochmal laufen. Jetzt sieht 
das doch schon viel besser aus. 

Das war's für heute. Das nächste Mal wer- 
den wir uns mit Kontrollstrukturen be- 
schäftigen. 


Die Gewinner der Aktion „Fehlerhaftes Listing“ 


Im Homecomputer Nr. # ist uns leider im Programm „Kassettenkopierer" ein kleiner Fehler unterlaufen. Die Zeile 
1180 muß wie folgt lauten: 1180 DATA, 157, 66, 3, 169, 127, 157, 72,3, 169,0, 157, 73,3, 32,86, 228, 32,31, 7, 104,104, 


104, 104, 160, 43, 21914 Die nachstehenden 3 aufmerksamen Leser erhalten für Ihre eingesandten Coupons jeweils 
100,- DM: Wolfgang Renner, Ramsschwagsir. 5, 8870 Günzburg /Roman Kunovie, Berliner Ring 22, 6072 Drei- 
eich /Jochen Calvelage, Drostestr. 44, 2643 Dinklage Andreas Volb, Berliner Ring 20, 6072 Dreieich /Matthias 
Stopponat, Möhlendorferstr. 36, 6730 Kaiserslautern. 
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10 PRINT"tCLEAR DOWNS SPACETIPLEABELSPAC 
EIALLÖWESPALEICH. (SPACEI?2. DESPACEIHIN. CE 


PA 43 
20 PRINT" DOWN? SPACEBITOLSPAGEICHECK [EP 


ACEITHELSPACEIDATALSPACEFIOF CSPACEI SPA 


DEI" 
Er] PRINT" CDOHNd SPACES SYTESPALEIATSFACEIN 
SPALEIKISPACER ISI5P ALEITESPACEIMISPACE) 
UTSPACEIL CSPACEIALSPACEIT SPACE) ICBPACEI 
ÜESPACEIN" 
a0 PRINT" CDOWN4 SPACETIBLSPACEVISPACEN 
TISPACEIHCS FACE +DiSPACEINCSPAGEJATSPACE) 
SISPALCEZIMIS PALEIATSPACEIRTSPACEIK“ 
Ss FÜR 1=0 TOlFL:READX:POKEIBF1241,X: RER 
DI: POKESFLAN+T „X:READK:POKESFADIHL N 
£&0 READX:POKEIIEBO+T ,XıREADX:POKESIFIG-T 
‚SzREADE:POREA40192+T „Z3NEXT 
?0. DATA4, 90,8, 180, ,,4,70,8,180,,,4,90,8, 
100, 4 TE TO LT IOE 
BO DATA17, 103, ,44490,17,103,,,4,90,17,10 
>4119+125,8, 180, ,49,123,8, 180, 4,4194, 123 
70 DATAB,1B0, ,,5,122,8,180,,,5,123,17,10 
3..,5,123,17,108,,,5,1235,17,103,,,5 
100 ..DATAL23,17,103, ,,5,207,8,180,,,3,207 
‚8,180, ,,5,207,8,180, ,,5,207,8,100,,,5 
110 DATA2O7,17, 103, ,,5,207417,103,,,5,20 
17,103, ..„5,207,17,103,,,65,132,13,10,, 
1 DATAS, 133,0,04346, 133,15, 10a 155, 
111,6,133,13,10,23,59,6,113444,21,237.6 
130 DATAIFS,13,10,23,39 56, 13I4 42620, 
70.,8,180, 21, 237,4,90,17,103,19,137,9,970 
140: DTAB,1B0,17,103,4,90,17,103,17,103, 
4,90,8,180,17,103,4,90,17,103,17,107,4 
150 DATA9O,0,180,17,103,4,70,17,103,17,1 
03;5,123,8,180,21,237,5,123,17,103,19 
1&0 DATAL37,5,123,9,190,17,103,5,123,17, 
103,17,103,5,123,8,180,17,103,5,123 
170 DATAL7,105,17,103,5,123,8,180,17,103 
„5,.123,17,.103,17,107,5,207,8,180,19,177 
1B0: MTAS,207,17,103,21,237,5,207,8,180, 
17,103,5,207,17,103,17,103,5,207,8,180 
190: MTAL7,103,5,207 ,17,102,21,237,3,207 
+8,180,19,.137,5,207,17,105,17,103,6, 133 
206 DATA13,10,19,137,6,133,24,20, 19,137, 
5,133,17,10,1%,10,4,133,24,20,13,10,& 
210 DATAI33,13,10.13,10,6,133,26, „20,13,1 
0,6,133,13,10,23,59,5, 133,26,20, 19,137 
>70. DATAS,90,8,180,21,237,4,90,17,103,197 
‚137,4,70,8,180,17,103,4,90,17,1023,17 
230 DATAL03,4,90,8,180,17,103,4,90,17,10 
3,17,103,4,070,0,100,17,103,4,90,17, 103 
240 -DATAL7T,103,5,123,8,100,21,237,5,123, 
17,103,19,137,5,122,8,180,17,103,5 
250 DATA123,17,103,.17,103,5,123,8,180,17 
„103,5.123,17,1038,17,103 
260 DATAS,127,8,180,17,103,5,123,17,103, 
17.103,53, 207 8,100, 19,137,5,207 
270 DATA17,103,21,237,5,207,0,180,17,103 
‚5,207,17,103,17,103,5,207,8,180,17,103 
7a0 DATAS,207,17,103,21,237,5,207,8,100, 
19,137,.5,207 ,17,1032,17,103,5,133,13,10 
290 DATAIF, 137,6, 133, 26,20,19,137,6,133, 
13,10,13, 10, 4,133,25,20,135,10,6, 133, 15 
300 DATA1O,13,10,5,133,26,20,13,10,6 
310 DATA13I,13,10,23,39,4,133,26,20,19,1 
37,4,70,8,180,21,237,4,90,17,103,19,137 
320 DATA4,70,8,180,17,103,4,90,17,103,19 
„137,4,90,8,190,21,237,4,70,17,103,17 
330. DATALOZ,4,70,8,180,24,20,4,90,17,105 
„17,103,5,123,8,190,17,103,5,123,17,103 
+46 DATAL?,137,5,123,0,180,21,237,3,127, 
17,103,17,103,5,123,8,190,26,20,5,123 
350 DATA17,103,17,103,5,123,8,180,19, 137 
5,123,17,103,21,237,5,207,0,180, 29,59 
350 DATA 5,207,17,103,23,537,5,207,8,160, 
24,20,5,207,17,102,23,59,5,207,0,100,27 
370 DATAS9 ,5,207,17,103,23,99,3,207,8,18 
0,25,20,5,207,17,103,29,67,6,133,13,10 
380 DATA2A,20,5,133,264,20,19,137,6,133,1 
3,10,13,10,6,133,24,20,19,127,5,133,13 
390 DATAIO,)24,.20,5,1332,264,20,19,137,&,13 
2,13,10,21,237,4,133,28,20,23 
400 DATAS9,7,81,17,103,24,20,7,81,14,162 
‚25,20,7,81,10,247,17,103,7,81,14,142 
410 DATA17,103,7,91,17,103,17,103, 7,8151 
7.105,17,103,7,81,16,109,21,237,7,81,14 
420 DATAL&2,29,69,5,207,17,103,34,207,5, 
207 ,14,162,34,207,5,207,11,198,29,49,5 
. 430 DATA207,14,152,29,69,5,207,17,103,297 
‚69,5,207,17,103,29,69,5,207,16,109,72 
446 DATA219,3,207,14, 142,34 ,207,4,225,17 
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‚103,34,207,4,2264,14,162,34,207,4,226 
450. DATALL,138,29,69,4,225, 14,152, 29,69, 
4,226,17,103, 29,59 ,4,225,17,103,34,207 
450 DATA4.,225,15, 109,43, 219,4, 224,21,237 
34,207,6,133, 19,137, 39,19,5,133,17,103 
470 DATA3F,15,6,153,15,103,39,18,5, 135,1 
7,103,57,15,6,153,19,137,39,18,& 

450 DATA1L33,19,137,39,15,4,133,13,10,34, 
2074,64133,25,20,32 

490 DATA219,7,01,17,107,25,20,7,81,14,1& 
2,24,20,7,Bi, 10,247, i7,103,7,81, 14,162 
Sol DATA1T, ioZ, 7,81,17,103,17,103,7,08[L,1 
7,103,17,103,7,81,15,109,21,237,7,01,18 
5i0 DATAl52,27,69,5,207,17,103, 34,207 ,5, 
207,14,162,34,207,5,207,11,.158,29,69,5 
520 DATA207,14,1642,29,49,5,207,17,105,27 
59,5,207,17,103,29,59,5,207,16,109,32 
530 DATAZI7,5,207,14,162, 34,207,4,226,17 
„103,34,207,4,224,14,162,34,207,4,226 
540 -DATALL,1589,29,69,4,228,19,152, 29,697, 
4.225.17,.103,27,69,4,226,17,103,34,207 
s50 DATAM,2I6,16, 109, 45,.2197,4,226,21,237 
34,207,6,133,19,137,39,18,6,133, 17,103 
560 DATAZ9, 16,6,133,15, 103,39,18,64 133,1 
7,105,359,165,5,1335,17,137,39,18,8,153 

570 DATALF,137 ,39,16,6,133,13,10,34,207, 
4,133,26,20,32,219 

SB0 DIMGt7SI:K=1000rFORT=0TO? 

20 Qt4B+l)el:ıdis3+i)=i#+iü: NEXT 

soo FÜORIT=299527032774: READAF 

510 E=ASCILEFTFIAE 1) JE L=ASCIRIGHTFIAF, 1 


520. Dad tE)#1h+ßilief=F+D:POKEI,D 

430 TeT#+lı iIFTSZOTHENNEHT: Te=-]1 

däcı READY: KaX+10:r IFV=FTHENGAO 

450 PRINT"EINGÄBEFEHLERTSPACENINTSPACEN 
"XıEMD 

460 IFT<OTHENEND : 

570 F=0:T=s0:NE3T 

sB0 DATA A0,FA,BF,FF,BF,#9,FF,BF,87,F9,7 
0,97,F7,C0,B9,F3,91,90,F3,0C1, 39726 

570 DATA BF,ED,72,79,ED,C2,B8,00,E3,AT,E 
0,80,1D,00,49,30,80,08,02,A0, 3235 

Foo DATA 20 ,AF,FF,90,DE,02,79,88,E3,58,D 
0,FA,A2,F0,A9,08,90,FF,D7,90, 3294 

710 DATA F7,DA,CA,DO,F7,A0,81,A97,00,97,1 
9,07,88,00,FA,n0,B5,A9,00,9%, 3235 

720 DATA BF ,D9,99,44,D4,88,00,F7,99,C7,8 
0.,67,02,69,7E,600,09,02,A9,5F, 3002 

730 DATA 80,C9,02,A9,04,80,01,02,80,C0,0 
2,47,09,80,C2,02,A9,08,80,C1, 2231 

740 DATA 02,99,09,00,BF,02,A9,07,00,CH,0 
2,80,CC,02,80,C0,02,80,CE,02, 2289 

739 DATA A9,097,90,6C5,02,00,C5,02,80,[C3,0 
2,80,C4,02,90,BB,02,997,0G8,80, 2187 

Tab DATA CF,02,A0,28,AF7,A0,77,EF,C9,A7,0 
E,??,EF,D9,88,00,F3,A0,00,A2, 3022 

70 DATA 5F,BA,#77,24,00,77,48,00,20,EE,7 
5,84,77,32,60,77,70,60,20,EE, 271& 

790 DATA 75,8A,77,7A,C0,997,79,0C0,20,EE,7 
3,89,77,A2,C00,#9,C0,C0,8C,D2, 3138 

90 DATA.02,A0,08,0A,00,D0,FC,AC,D2,02,C 
8,00,04,00,CA,4C,FB,75,8C,D2, 2755 

a0 DATA 02,A0,04,EB,88,D0,FC,AC,D2,02,&4 
0,A0,04,A9,0F,79,297,D8,97,48, 2457 

Bio DATA 08,9797,51,08,99,77,08,F77,Al,D8,7 
9,70,08,977,90,009,77,C00,D8,B8, 3585 

320 MTA 09,E5,97,0F,8D0,28,00,00,297,D0,A 
2,.14,894,90,E4,C3,E8,E0,17,00, 2787 

830 MTA F7,AT,1IF,80,00,D0,49,00,80,27,D 
0,00,24,00,497,83,A2,08,90,FF, 2674 

840 Data CF,CA,CA,00,F9,AF,37,80,02,00, A 
9,1F,80,04,00,A7,37,80,06,D00, Z77%5 

830 DATA A9F,0C,90,10,D0, A? OF O0, 1C,D0, N 
7,00,80,25,00,97,08,80,25,00, 2724 

360 Data PR: ‚DA,02,26,28,00,A9,9D,B 
D,08,00,A7,BC,ED, N 2458 

870 DATA 80,10,00,AY,0F,80,1C,D00,AF,1F,8 
D,15,;00,A7,12,80,35, Be O3, 2255 

EBO DATA 80,36,C0,h9,OF ‚80, 37,C0,A9,12,8 
D,39,C0,80,AC,C3,80,ADb,C3,AF, 2721 

870 DATA 05,80,37,C0,80 ‚sä,co, Bb A B 
b,74,C5,00D, BF, E3,89, 3n,0D,3B, 2650 

FOO DATA CO,80,88,C00,80,58,C05,A7,30,80,3 
D,C0,20,3€,C0,8D,3F,C0,80,40, 2698 

216 DATA CO,2D,80,C0,20,BE,C0,80,70,C0,8 
D,50,C3,80,5€,03,47,14,80,65, 2740 

720 DATA C0,80,A8,C3,AY,07,00,B4,C0,AF,0 
D,80,87,C0,80,57,C3,80,AA,C3, 2720 

750 DATA AP „04 ,80,55,C3,49,01,80,35,C3,8 
D,58,C3,00,AB,C3,A9,07,80,59, 2523 
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740 -.DATA 03,99,23,80,60,C3,A9,02,80,A5,C 
3,47 ,19,80,45,05,A9,18,80,AD, 2708 
750 DATA C3,A7,38,BD,AF,C2,AF,36,80,B0,C 
3,AF, 2E,80,A9,03,R9,05,80,26, 2740 
950 DATA C3,80,3F,63,A9,06,00,7E,C3,80,B 
7,63,47,15,8D,4E,C07,80,67,C3, 2831 
770 DATA AO,0C,AF,01,977,74,DE,77,84,08,° 


= 
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1009 DATA .C3,99,41,03,A7, 
43,C3,A9,09,97,27, 

1010 DATA 997,43,08,97, 
DB,77,42,DB,AF,01,99,25 


w 
a: 
3>823 
3°3°3 
BETT 
B°3°n 
83 


1020 DATA 3F,DE,98,18,59,: 
C9,AY,71,80,23,03,80,42,03,A9, 2756 
1030 DATA 72,80,48,C02,80,4A,C3,A9,73,60, 
73,C3,00,72,03,49,74,80,98,C3, 2940 


3 


1040 DATA 80,BA,C35,46,EE,77, 
öf.F0,10,67,5E,F0,00,C9,&D,FO 
1050 DATA. 08,C9,5B,F0,04, 
20.,06,77,49 ,1F ‚00,EB,02,49,02, 2513 
1060 DATA 80,88,02,60,F3,02,A9,07,BD,EF, 
02.80,F7,.02,49,0C,BD,E#, 9, 2385 
1070 DATA FO,ED,1D,D0,A7,00,50,1B,D0,A®, 
D 
DO 
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OB,80,10,07,00,17,07, ‚1A,D7, za 
1080 DATA. AD,00,DC,C9,4E,D0,00,AD,09,D0, 
C9,54,F0,14,0E,09,D0,40,42,70, 2551 

1070 DATA C9,4D,D0,0N,AD,09,00,09,B0,F0, 
03,EE,09,D0,20,48,78,4C,60,78, 2322 

1100 DATA AC,DA,07,A2,00,00,01,F0,0n,A9, 
00,90,88,E3,E8,B8,40,4D,78,AC, 2499 

1110 DATA DA,02,AF,FF,00,20,F0,08,797,87, 
E3,C8,C0,21,D0,F9,&0,AD,EB,02, 3018 

1120 DATA 27,01,00,03,EE,EB,02,AD,EB,02, 
29,02,D0,06,EE,EB,02,EE,EB,02, 2345 

1130 DATA AD,EB,02,297,04 ‚00,07,AD,EB,O2, 
10,67,04,,0D,EB,07,AD,EB,02,29, 2044 

1140 DATA 08,00,07,AD,EB,02,18,59,08,BD, 
EB,02,AD,EB,02,27,10,00,07,AD, 2007 

1150 DATA EB,02,19,57,10,00,EB,02,AD,Dn, 
02.,09,20,00,03,40,56,7F,AD,EB, 2310 

1160 DATA 02,09, FF.FO,03,20,D8,7B,AD,EB, 
02,29,20,00,06,20,55,79,4C,D8, 2300 

1170 DATA 79,20,74,77,AD,EB,02,29,40,D0, 
06,20,54,79,40,E9,70,20,D2,79, 2154 

1180 DATA AD,EB,02,29,80,00,05,20,56,79, 
“C,F@,78,20,29,7A,AD,00,DC,09, 2266 

1170 DATA 69,F0,14,07,56,F0,10,09,67,F0, 
06.09.59, F0,08,09,5N,F0,04,07, 2782 

1206 DATA &B,D0,03,20,0D0,7E,ADb,F7,02,C9, 
07,F0,03,40,56,7F,AD,DA,02,C9, 244% 

1210 DATA 1A,D00,05,47,03,80,E0,02,AD,EB, 
02,29,20,00,03,30,37,79,20,6E, 1900 
1720 DATA 79,AD,EB,02,29,20,00,03,40,46, 
79,20,66,77,AD,EB,02,29,80,D0, 2132 

1230 DATA 03,4C,15,79,20,68,79,40,15,78, 
8C,F5,02,BE,F4,02,R2,03,A0,00, 1500 
1240 DATA EA,„BB,D0,FC,CA,DO,F7,AE,F4,02, 
Ac,FS,02,60,47,02,00,00,EN,00, 3118 

1250 DATA DO,FC,CA,DO,F7,60,AD,FO,02,C9, 
00, DO ,zZF,AD,FD,C3,C9,1B;F0,13, 3192 

1750 DATA [9,1E,FO,0F,C9,21,F0,06,EE,FD, 
C3,A9,13,80,F0,02,4C0,80,79, 42, 2763 

1270 DATA 00,40,00,20,44,7A,AD,EB,02,E9, 
20,80,6B,02,07,02,50,DB,02,50, 2128 

1286- DATA A2,00,AD,E4,02,29,20,00,08,20, 
B2,7A,E0,01,F0,09,60,20,73,7A, 2009 

1295 DATA EO0,01,F0,01,50,AD,EB,02,E9,20, 
20,EB,02,60,AD,F1,02,07,00,00, 2336 

1300 DATA 2F ,AD,FE,C3,69,1B,F0,13,C9,1E, 
FO,0F,69,21,F0,08,EE,FE,C3, AP, 2985 

1310 DATA 13,80,F1,02,4C0,08,70,h2,01,A0, 
02,20,A4,7A,AD,EB,02,E9,40,0, 2100 

1320 DATA EB,02,A9,02,680,BB,02,50,42,02, 
AD,E4,02,27,40,D0,04,70,82,7n, 2006 

1330 DATA EO,01,F0,07,60,20,73,74,E0,01, 
F0,01,60,AD,EB,02,E7,40,8D,EB, 2514 

1340 DATA 02,40,AD,F2,02,69,00,D0,2F,AD, 
FF,25,69,1B,F0,13,C9,1E,FO,öF, 2567 

13509 DATA 69, 21,F0,0B,EE,FF,C3,AY, 13,80, 
F2,02,40,60,74,12,02,40,04,20, 2400 
1360 DATA A4,7A,AD,EB,02,67,80,80 ,EB,02, 
A9,02,80,6B,02,60,A2,04,,AD,E4, 2599 
1370 DATA 02,29,80,00,08,20,82,7A,E0,01, 
FO,07,60,20,73,7A,E0,01,F0,01, 2008 

1380 DATA &0,AD,EB,02,E7,80,8D,EB,02,80, 
AO,00,98,00,04,00,00,03,A2,01, 2466 

1390 DATA 50,08,00,08,00,F2,60,A0,FF,9d, 
DD,0A,00,09,03,A2,01,40,88,C0, Zi4s 

1400 DATA 37,00,F2,50,CE,BB,02,BD,FD,C#, 
E7,21,00,16,A0,05,20,99, 76,868, 2711 

1410 DATA DO,FA,AO,07,AD,DA,02,C9,01,F0, 
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064, CE,0A,02,88,D0,F3,40,3C,5C0, 2745 
1420 DATA 78,E0,00,00,07,AD,E4,02, 27,20, 
DO,F2,E0,01 ,00,07,AD,E4,02,29, 372 
1430 DATA 46,00,70,E0,02,00,07,AD,E4,02, 
27.80.00, 72,A2,7C,84A,097,0A,D0, 2423 
1440 DATA FO,ZA,EB,E0,00,D00,F5,B7,0A,D0, 
AA ,„CH,BA,77,09,00,20,534,79 ,EE, 29532 
1450 DATA C1,02,EE,C2,02,69,04,09,C09,01, 
00,E7,09,09,00,C1,02,00,C02,02, 2323 
1440 DATA 20,87,78,60,89,04,00,AA,EB,0A, 
79.,09,00,20,55, 77,EE,EC1,02,EE, 2610 
1470 DATA C2,02,B9,0A,00,C9,00,D00,E7,C0, 
095,0D9,07,Ab,E4,02,18,659, 20,60, 257 
1480 DATA E4,072,C00,02,00,0%,AD,E4,02,18, 
57,40,80,E4,02,C0,04,00,097,AD, 2194 
1490 DATA E4,02,109,497,80,8D,E4,02,AD,E4, 
02,80,10,00,67,0A,00,AA,EB,BA, 259 
1500 DATA 97,04,00,20,54,77,EE,C1,02,EE, 
EC2,02,07,04,00,C7,54,00,E1,AP, 2703 
1510 DATA 08,80,C1,02,80,02,02,20,87,78B, 
50,40,50,603,09,39,F0,07,EE,50, 2363 
1520 DATA C35,EE,SD,C3,40,EE,F7,02,40,R2, 
57,40,40,C0,C7,37,F0,05,EE,40, 7804 
1520 DATA CO,4C,04,75,49,30,00,40,C00,AD, 
SF ,C0,09,39,F0,06, EE,3F,Co,AC, 2718 
1540 DATA 04,78,49,30,80,3F,C0,AD,3E,C0, 
CF ,0F,FO,05,EE,3E,C0,4C,04,78, 2740 
1550 DATA A97,30,800,3E,C0,EE,30,C00,CA,n0, 
C4,50,05,42,C09,E5,00,04,20,F2, 3049 
1560 DATA 7B,50,C9,B2,00,04,20,08,70,&40, 
C9,1F,09,03,29,C5,7D,40,AD,EB, 2372 
1570 DATA 02,27,20,00,38,A9,01,80,2C,D0, 
AP ,1C,80,F0,03,49,73,80,08,00, 2332 
16580 DATA A? ,04,800,F0,02,20,AF,7C,AD,EB, 
02,18,597,20,80,EB,02,E0,01,F0, 2307 
15970. DATA 10,AD,E4,02,27,20,00,097,AD,E4, 
02,18,59%,20,80,E4,02,8C,04,D00, 2002 
1500 DATA 50,AD,EB,02,29,40,00,38,47,04, 
g0,F1,02,A%,01,80,20,D0,AP,1C, 2197 
1510 DATA B0,FE,C3,497,73,680,00,00,20,AF, 
-C,AD,EB,02,19,57,40,8D0,EB,02, 28 
1420 DATA E0,01,F0,10,AD,E4,02,29,40,00, 
097,AD,E4,02,10,67,40,00,E4,02, 2173 
1530. DATA BC,0C,09,50,AD,EB,02,297,80,D0, 
37 ,99,01,80,2E8,0D9,A9,1C,80,FF, 245% 
15440 DATA C3,A9,04,80,F2,02,A9,73,80,0F, 
00,20, AF ,7C,AD,EB,02,16,59,80, 2403 
1430 DATA 80,EB,02,E0,01,F0,10,AD,E4,02, 
29,80,00,09,AD,E4,02,18,59,00, 2308 
1550 DATA 80,E4,02,8C,0E,00,50,AD,12,D0, 
890,E8,02,40,28,A2,01,CC,E8,02, 2404 
1570 DATA DO,01,CA,89,D0,FT,AD,EB,02,E?, 
17,AB,BE,E#F,02,A2,2D,AD,EB,02, 2827 
1480 DATA 29,20,00,03,4C,DC,7C,6CC,0A,00, 
FO,DS,AD,EB,02,27,40,00,03,4C, 237% 
15?0 DATA EB,7C,CC,00,D0,F0,C4,AD,EB,02, 
29 ,80,00,03,4C,FA,7C,CC,0E,DO, 2685 
1700 DATA FO,B3,C9,CA,E0,00,00,6D,AE,E#, 
02,AC,EB,02,89,40,AD,EB,02,29, 29758 
1710 DATA 20,00,38,47,00,80,2C,00,7,1%, 
E0,FD,C3,AF,50,80,0B,D0,20,AF, ar 
1729 DATA 7C,EO,01,F0,10,AD,E4,02,29,20, 
06,097,AD,E4,02,19,49,20,BD,E4, 2221 
1730. DATA 02,80,0A,00,49,04,80,F0,02,AD, 
EB, 02,10,47,20,80,EB,02,50,AD, 2140 
1740 DATA EB,02,29,40,D0,28,A7,00,60D,2D, 
00,47 ,17,80,FE,C3,A7,50,80,0D, 2372 
1750 DATA DO,20,AF,7C,E0,01,F0,10,AD,E4, 
07,27,40,00,07 ,AD,E4,02,10,549, 2277 
1760 DATA 40,80,64,02,BC,0C,D0,A9,0A,2D, 
Fi ‚OzZ,AD,EB,02, 18,59,40, 80 ‚EB, 2337 
1770 DATA 02,50,AD,EB,02,29,80,00,27,4#, 
00,80,2E,00,AF,17,80,FF,C3,n7, 2444 
1780 DATA 50,8D,0F,00,20,AF,7C,E0,01,F0O, 
10,AD,E4,02,27,80,D09,07,AD,E4, 2452 
1770 DATA 02,18,59,00,80,64,02,80,0E,D0, 
A ,0A,80,F2,02,AD,E8,02,18,59, 2095 
1B00 DATA B0,20,EB,02,&0,EE,E0,02,Ab,E0, 
02,C7,03,F0,01,50,A9,00,8D,E0, 2540 
1810 DATA 02,AD,EB,02,29,20,D0,38,A7,01, 
80,20,00,49,1F,B0,FD,C3,A#,73, 2385 
1826 DATA 80,08,00,20,AF,7C,E0,01,F0,10, 
AD,E4,02,297,20,0D0,09,AD,E4,02, Z2588 
1850 DATA 18,47,20,80,E4,02,8C,09,00,A7, 
oA,B0,F0,02,AD,EB,02,18,59,20, 2023 
1840 DATA B60,EB,02,60,AD,EB,02,27,40,D0, 
38,49,01,80,2D,D9,47,1F,806b,FE, 2412 
1850 DATA GC3,497,73,8D,00,00,20,AF,7C,EO, 
01,F0,10,AD,E4,02,29,40,00,07, 2378 
1850. DATA AD,E4,02,18,57,40,80,E4,02,BC, 
o9C,D0,Ar,0A,00,F1,02,AD,EB,02, 2300 
1870 DATA 18,67,40,80,EB,02,50,AD,EB,02, 
27,00, 0D0,27,AY7,01,8D0,2E,D0O, AP, 2229 
IBBO DATA IF,BD,FF,C3,AF,73,80,0F,00,20, 
AF ,7C,EO,01,F0,10,AD,E4,02,29, 2525 
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40 HOMECOMPUTER 





m — — 


1870 DATA 50,00,07,AD,E4,02,18,59,90,8D, 





Wie man sich unnötigen Ärger 
ersparen kann! 











E4,02,8C,0E,00,47,04,80,F2,02, 2302 22105 
1900 DATA An,EB,02,18,57,80,80,EB,02,80, 
R0.,00,20,27,7F.BE,FD,C3,A0,64, 2347 125> 
1710 DATA 20,56, 797,88,D0,FA,AD,EB,02,E7, 


20.80 ,EB,02,50,n0,01,20,27,7F, 2341 <16A> 
1920 DATA BC,FE,C3,A0,54,20,56,79,89,D0, 






Fh,AD,EB,02,E9,40,8D,EB,02,50, 2863 «235 > Je 
1930 DATA A0,02,20,27,7F ,BE,FF,CI,AO,&4, Ei 
20,56,79,88,00,FA,AD,EB,02,E#, 268% c71> 

1740 DATA B0,80,E8,02,60,A0,00,49,272,80D, 

FC,C3,A7,02,80,29,D0,80,27,D0, 2503 <B> 

FB,AD,0D,02,C9,03,D0,F#,AE,FF, 20097 «123> 

1940 DATA 02,A7,0F,80,27,00,80,28,00,A9F, 

18,80,FC,03,84,29,10,00,04,50, 2249 <225> 

1970 DATA 40,92, 7E,89,2%,20,D00,FB,8A,29, 

40,00,84,84,29,80,00,9E,60,8C, 2313 <154> 

1980 DATA F4,02,B9,F0,C3,69,19,F0,11,.69, 

14,F0,00,09,18,F0,09,20,99,7B, 2627 «250} 

1970 DATA 20,99,78,AC,F4,02,B9,FD,C3,C9, 

19,F0,09,C69,1C,F0,04,C9,IF,DO, 2746 <1B6> | 

2000 DATA 03,40,25,50,09,1A,F0,08,69,1D, 

FG,04,C9,20,00,03,00,24,60,90, 2137 53 

2010 DATA 25,60,A7,00,00,88,02,A2,BC,EE, 

Br ,02,EE,00,02,20,54,77,AE,F4, 2454 <251> 

2020 DATA 02,CA,D0,F1,A7,00,8E,BF,02,BE, 

c0,02,89,1F,80,15,00,49,20,90, 2421 <211> 

2030 DATA FO,CO,70,F0,C1,6A,D0,F7,90D,F0, 

C2,EB,E0,07,D0,FB,A9,00,20,F3, 3633 <246> 

2040 DATA 7F,A?,07,80,BE,C1,A7,01,8D0,C1, 

C1,99,00,80,C4,C1,49,05,80,C07, 27% <212> 

2050 DATA C1,80,03,6.1,A7,0F,80,C0,C1,A?F, 

15,80,00,61,A7,12,80,D6,C1,20, 2961 <238> 

2060 DATA FC,TF)AF,06,20,F3,7F,20,FC,7F, 

A? ,02,20,F3,7F ,20,FC,7F,A#,07, 2327 9a) 

2070 DATA 20,F3,7F,20,FC,7F ,A#,01,20,F3, 

7F.20,FC,7F,20,06,77,09,00,8D0, 2471 “205 > 7 | 
2080 DATA 15,00,50,40,29,99,8D,07,89,D0, Wir können ja verstehen, daß Sie von HOMECOMPUTER 
Ad ee Sa 1955 | begeistert sind. Aber Sie sollten das Studium dieser Lektüre 


nicht so schamlos ühertreihen, wie der Herr auf dieser Abbil- 

dung. | | 

Zum Abschluß noch ein Rat: Wenn Sie unsere Superpro- | 

gramme nicht abtippen wollen, so bestellen Sie diese einfach 

über den Softwarekatulog ($. 76/77). Ihre Frau wird es Ihnen 
danken! 


isting: ENDE 








Stellen Sie sich vor, ein heißer Sommertag und Sie liegen am Strand. Eine Erfrischung würde jetzt 
richtig gut tun. Also entschließen Sie sich, sich ein Eis zu kaufen. Aber Ste sind nicht der einzige, und 
müssen sich deshalb in eine lange Warteschlange einreihen. Dabei kommt Ihnen der Gedanke, daß 
sich mit Eis doch ein sehr gutes Geschäft machen läßt. Aber ist das wirklich so einfach? Wie verhält es 
sich, wenn das Wetter einmal schlecht ist? Wieviel Eis darf man erzeugen, um nicht darauf sitzenzu- 
hleihen ? 

Das Programm ECONOMY simultert al- | p) Wieviel kostet die Werbetafel? in und kalkulieren Sie den Gewinn nicht 
le diese wichtigen Entscheidungsprozes- | ©) Wieviel Kapital habe ich noch? ' zu hoch, da Sie sonst weniger als Ihre 
se, Statt faulin der Sonne herumzuliegen, Konkurrenten (= Spielpariner) verkau- 
SUCH N Ink Talent nn Kleihunlernei: Jede Runde stellt einen Verkaufstag dar. fen. 
mer unter Beweis stellen. — | jeder Mitspieler, der noch Grundkapital 

Ja nach Wetterlage müssen Sıe entschei- 


hat, wird pro Runde einmal aufgerufen. | „_ 4 Art nee 
Be iel’Eis erzeuge:ich? Das Wetter ist natürlich für alle Mitspie- In der Auswertung erfahren Sie: 
a) Wieviel Eis erzeuge ich? 


len ea ler gleich, aber die anderen Parameter | „\ Wiaviel Fie Sie erze | 
NE Nr ee nAlisa ich | 1, ngeren £ a) Wieviel Eis Sie. erzeugt haben. 
em Prefsterkaufeichdaspist | Nchten sich nach den jeweils eingegebe- 
C) ZU WEICHE ale A | nen Werten. Die Selbstkosten (Eis, Wer- 
Angezeigt wird: 


betafeln) verändernsich, wieesder.Reali- 
a) Wie hoch ist der Selbstkostenpreis? | Passen Sie den Verkaufspreis dem Wetter | d)Den neuen Kontostand. 


b) Wieviel Eis Sie verkaufen konnten. 
c) Welcher Gewinn/Verlust produziert 


ze 


tät entspricht. wurde. 


1) 
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Sollte einer oder mehrere Mitspieler e3 
geschafft haben, mehr. als 1000,- DM zu 
erwirtschaften ist’ das Spiel beendet. Sie- 
gerist derjenige, der den höchsten Konto- 
stand vorweisen Kann. 

Ein besonderer Reiz dieses Spiels liegt in 
der Tatsache, daß hier, im Gegensatz Zu 
manchanderen Programmen, Sıchmehre- 
re Spieler miteinander messen konnen. 
Außerdem handelt es sich bei ECONG- 
MY nicht um ein Schieß-, Spring-, Grab- 


oder Sammelspiel,sondernumein Taktik- 
eame; das sogar einige Lernellekte bein- 
haltet, 


Erfreulich ist auch, dal dieses 
tolle Spiel auch auf der Grund- 
version des VC 20 läuft. 

Wir wünschen viel Spali beim 
= Abtippen und spannende Stun- 
den beim Spiel. 
ı POKE3SAB7F 27 156} 


— ! 2.PRINT"LCLEAR DOWW3 BLACKIWOLLENTSPACEI 
= 1 SIEISPACEIDIETSPACEFBPIEL-TFPACEIREGELNT 





SPACEILESEN" re 
= INPUT" J/NI "HU8 275 
ni 4 IFilt=e"N"THEN? u 

5 IFUE="J"THENIO <147> 
& GOTOR 27205 % 
? PRINT"LELEAR POHHI BLACKICOMPUTERTSRAR 
EILAEDT SPACE) HAUPT-":FRINT" PROGRAMM" 270) 
BE POKE&SE, 15: POKEI FO, 1 245 > 
7 :END <a7Tı 
10 VE=ZAH78: Vb=3a07 5: Veh Va=Tahte <11-1> 
20 E=7922:F=30842 CirAr 
40 PRINT"IQLEARF" «70 
so GOSUB4200 < 1095 
SS PRINT"CDOHNS BLACKIBITTEISRAGEITONESR 
ACEHEINSCHALTEN" ader 
54 C=#7:G05UB5300 2475 
“go GOSUB4000 <111> 
50 GOSUBS000 113 
70 GOSUuRBsi oo a Bel 
80 DATAS,2,15,14,15,:15,253 <218> 
a6 FORZa#TOLASTERZ 1 h$ 
100 READN <135> 
ii0 GOSUB4100 «1703 
170 POKEE+Z,N:POKEF+Z,O 117% 
130 GOSUBA200 21455 
140 NEXT 1945 
150. GOGSUBAOOO “2035 
150 PRINT"{BLACK DOWWIEIN" 178} 
170 FRINT"CDIKKIRIRTSCHAFTSSPIEL" 537} 
180 C=2 a 
170 GOSUBSFOD ch 
194 PRINT*CCLEAR BLACK DOWNII SPACEIIFÜE 
RASPACEID-HTZPACE)FERGOREN" 1373 
199 GOSUBA300 <B> 
200 PRINT"CCLEAÄR BLACK DOHMLFEWON" 145? 
#10 PRINT" CDOHNFHEINTLSPACEIDOETZL" 48 > 
230 GOEUBA30X <40> 


740 FRINTTCELEAR: BLACK DOWNIF RIGHT Z>AU 
STRIATILEFTE DONNSIITEPACEIFLSPRAC EIBCSPAL 


E64" <Al> 
740 GOSURAFGO “71> 
>70 GOSUB4000 et 
280 GOSUBSOOO ‘Bor 
290 GOSUB4100 cH]> 
200 DATAIF, 16, 9,5,12,18,5,74,5, 12,14 rer 
10: FÜRZ=EHTOFUSTEFZ re 
320 READY 1225 
v0 GOSUBAL00 <139> 
z40 POKEE#+Z,YıFOKEF+Z,0 2148> 
350 GOSUBA200 «1383 
350 NEXTZ 159% 
Fe GOSUBAGOG 160} 


60 PRINT" CLEAR DOWN BLACK SPAGESIERZFA 
CEICHSPAGE)OTSPACEINTSPACE)OLSPAGEIMLSRA 


CErT" 75 
310 FRINT"{BLUE DokN? SPACEZ GREENISIRER 
HE im 205} 


420 PRINT"{SPACE YELLOWIBIGREENIWCREDIEM 
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430 PRINT" CTELLOWI IMIRREEN TECH D 2 RE” 
440 PRINT" CHLACK RYSON SPACER EFSOFEI" 
as PRINT" WCRFSOH SPACES AFSOEEr“ 

440 PRINT"ISPACE? AFEOH SPACE BVSGOFFEF" 
+70. FRINT" CSPAGE RUSOHIFLSPACESFRTLRFSDER 
y 

4B0. PRINT"CDONNI GREEN SPACESILEERTASTEL 
SPACFIDRUECKEN" 

470 PRINT" CHOME BLUE DONN4ISIECHPACEISIN 
DLSPACEYEINTSPACEIETBVER-TSPACEZIKAEUFER 





0 PRINT"BELTSPAGEIBERUECKSICHTIGUNGCSP 

ACH) DER SPACE }WETTERLABE TSPACEIMUESSENSI 

EtSPALEINUNESPACEIENTSCHEIDEN: " 

=10 PRINT“DONNI EIGHTEIWIEVIELCHRACEIPO 

R=-LSPACE? RIGHTEITIONENSSPACEIEISTSAACES 

EIGHTEIKDECHTENSZFACEISIET 

S20: FRINT"{$IGHTE IHERSTELLEN“ 

S40 BETAF:IFAF=""THENSTO 

540 PRINT" {UPS RICHTEIWIEVIELTSPAGEWERB 

E-CRIGHTEYTAFELNISPACEIWERDENISPAÄGE AicH 

TSISIETSPACEIBENDETIGEN" 

550 PRINT"LLP RIGHTS SPACEISN” 

50 GETAF: IFAF="" THENSAO 

570 PRINT"(UPE BISNTBIUNDESPACEIZUTSPÄAGE 

FWELCHEMIRIGHTEIPREISTSPACEIWERDENTSPAGE 

2 RICHTSISIELSPACEITHRISPACEIEIBISHPACES} 

SO PRINT"{UF BIGHTOIVERKAUFENTSPACETF" 

00 GETAL: IFAte""THENSFO 

#00. PRINT"CHOHE DOHNHS}WENNISPACE I5IEiSPA 

CEIDIESEISPACEIDATENTSPACEI}YEINGEGEBENTS 

PACEIHÄBEN, IST (SPACEZIFOLGENDESTSPAGEHFU 

ERTSPRAGEIDEN IS RACE JE" 

510 PRINT" TABES- (RUNDEN) ERFOLG ESPAGERIEN 

TSCHE IDEND: {5P 

520 PRINT“ CDONNT RIEHTRIDIELSPACELT RIEH 

TSIWETTERLAGETSPACETT " 

530 PRINT*CUPZ RIGHTS SPACEI# EIGHTE3DIE 

tSPACEIHOEHE LSPACEIDESTSPACE AIGHTEIEISP 

REISESISPACEII" 

538 GETAS: IFAF=""THENAFR 

540 PRINT“ LCUPS RIGHTSIUNDLSPAGEIDIELSRAG 

EIHOEHE SPACE PAcESarenespäcEhuei” 

„CRLGHTSIDIEKSPACEIALCHLSPACEIBET" 

350 PRINT“{UP RIGNTE} NULL-VERKAUF RICH 

TEIENTSTEHENTSPAGEAI" 

se BETRAT TEASER ENDE 

440 PRINT"CHOHE DOWN# SPACESFDOCHLENACE? 

VORSICHT! I CSPACEFIALUICHSPACEIDERTSPACE) 

PLEITEBEIERtSPÄLERFWARTET „FALLSTSPACENIH 
HEN LSPAGEIDER" 

570 PRINT" CUPIERFOLGCSPACEINICHTLSPACEIT 

REUCSPACEI IST CSPACERTI" 

550 PRINT=CDOMNI RIGHTS SPACEI4 RIGHTS 5 

PALEI# RIGHTS SPACEI4I" 

HF PRINT" NT" RIGHTS SPACE RIGHTS SPAL 

Eis SPACEIS}“ 

700 GETAS: IFAF=""THENTOO 

720 PRINTICLEARI" 

725 CeiıG0SsUB4a300 

730 PRINT"tBLACK DOWN#IWERTEPAGEIUEBERSE 

HREITETCSPACEHANCSPAGEIHOECHSTENTSPAGENO 

IELSPACEI LOOOLCSPACEIDHH SPACE? MARKET" 

73% C=i:GOSUBASOO 

740 FORT=1T01000 

Ts0 PRINT"CHOME DOWNI4 RED SPACERT“ 

Tao NEXTT 

780 Ce}: GOSUB4300 

E00. C=1:G05U84000 

E10 PRINT"{BLACKYJEDERTSFPAGEIMITSFIELERT 

SPACEIWIRDESPACE) PROTSPACEIRUNDE (=E INTER 

ACE) TAGI KSPACETIEINIALTSRACEI AUFGERUFEN. 








320 C=74G0SUBL 300: GOSUB4 100 

330 PRINT" CBOHNINACHLSPACEIJEDERTERATEIR 
UNDE SPACE} WIRD SPACEIETNETSPACEIRANGLIS 
TEISPACEIAUS- {SPACE JIBEGEBEN,. ” 

gac GOSUBs300: ECOSUB4100 

Era PRINT" CDOHHFBLITTETSPAGEIBEBENISRF AcE) 
SIELSPACEINURTEPACEF) GANZE (SPACE) NATUERL 
ICHELSPACESIZAHLENTSPACEIEIN. " 

Eh GOSUBATO: GOSUB4LOO 

BES PRINT" COQHN} IHRELSPACE) NAMEN, WELCHE 
SPACEISIELSPASEIEINGEBEN ,SOLLTENTSPACEIN 
ICHTMEHR SPACE ALSESPACE) LOCEPACE)I BUCHST 
ABENHABEN. " 

853 GISUBSSOO 

Br - PRINT" CDOHNIWOLLEN{SPACEISIETSPACEID 
IETSPACE}S PIEL- {SPALEIREGELNTEPACEINOCHN 
ALSTSPACEILESEN”" 

aac INPUT" UFNI "ICH 

E70 IFts="J"THENTTO 

acc. IFCHLÜH"N"THENPRINT"CCLEAR DOWHI REM 
FALSCHE (SPAGEYEINGABE BLACK) "I BOTOBS7O 
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920 PRINTÜTELEARY" 


730 60707 

320 END 

+20 FORK=1TO1000: NEXTK:FRINT"ECLEARF "HF 
DRO=1 TO1000: NELTO:RETURN ' 

4100 FORK=1T01000:NEXTE+ RETURN 

2200 FORK=1T02000: NEXTE: RETURN 

2000: FORK=OTO21: POKETBSS+K „42: POKEIASFA+ 
KT:NEXTK 

010. FORK=0TD21:FDKEBCHF-K „42: POKE3O727- 
E,r7:KEITE: RETURN 

4100 FORE=S1TOSO:NERTE:PFOKEVB, 15: FORL=195 
101555TEP=-2: POKEVS ,L:FORH=1 1020: NEXTH,L: 
POKEWS,0 

5110 RETURN 

6200 POKEVE, 15: FORK- 1 T025: POKEVA 725: NEX 
TE: FORB=15STOOSTEF-1: POREVS 0 

E2lt NETTO: POREVYA 0: RETURN 

6300 FORD 1 TODE: FORK=1TOS00 : NEXTE:FORB=1T 
D2ı FOKEVB, 15: POKEYS, 1385: FORQ= 1 TOLOO:MEXT 
[r] 

#310 FORA=1LSTDISTEP-1: POKEVB „A: PÜREVS 13 
3: NEXTAIFOKEVS „0: NEXTB: FORK= 1 TOAO0: NEXT 
:NEXTD 


4320 RETURN 


i U=el 
Fr PRINT"TELEAR}" 

+ FOKE35B797,27 

4 PRINT"£CBLYE}" 

3 PRINT"GEBENLSPACEISIELSPACEIBITTELSPAL 
EIDIELSPACETI ANZAHL ESPACEIDER SPACEISPIE 
LERISFÄACEIEIN® 

5 INPUT" CHAR ASPACE}StSPACEISPIELERI "IN 
7 IFNSORNG ZORINT INhX >NTHEN? 

B FORI=LTON 

a K4lte100 

10 NEKTI 

il FRINT"ECLEAR)" 

i2 FORI=1TON 

135 PRINT*NAMELSPACEIDES* I" CLEFTI-TENGSPA 
CEISPIE-" 

14 INPUT"LERS"INF TI: IFLENIMFLII FF LOTHEN 
PRINT"{DOUN AR SEM} AHAMNE (SPACE IHAE.SHPACE 
NIOLSPACEHFIETCHENT KRFSOFF) “ıFRINT“ CDOHN) 
"1607013 

13 FRINT*CCLEARI" 

i& MEZTI 

17. GOTOS5S00 

18 FORk=1TON 

17 IeINT IANDITI eM +1) 

20 IFSi14e7THEN1F 

#1: X11)=7 

22 PRINTTICLEAR BLUE)“ 

> PRINTHFIII 

74 PRINT "ErEil Du)uusskassaansaaererenn 
BL: # are 

23 IFE il >OTHENZT 

26 PRINT"CSPACES RED DOWNZIDANKROTT!CBLA 
4 27 FORA=1T0OF0001NETTA 

a GOTOS?7 

29 PRINTFSREDIKETTERBERICHTT {BLACKY" 

0 FRINT" DON) "WER 

31 FRINT“WINDSTAERKE: "INGE "EM/H" 

33 FLITI=INTiANDEIIe4+3) 

a P#tIII=INTiIRNDILI#FH+S) 

5 PRINT" {BLACK DOWMFEINE CSPAGEIPORTIONG 
SPACEIEISCHPAOESIKOSTETLSPACES BEN SPACE 
3"; PLITII 
+6 FRINT"{BLACH DOWHNIEINEISPACEIKERBETÄAF 
ELLSFAÄCE IEDSTETiRER SPACEIT) DArsPHiT 
57 PRINT" BLACK POMN) IHRCSPACEIKAPITALES 
PA CEIBETRAEGTESPACE RED SPACELZIDH" KEIN 
sg FRINT"CDOHN TELLÜNFFR#r en nn un 
“ertiLle)" 

3? FRINT"MWIEVIELTSPACESPORTIONENGSPACEIE 
ISISPACEISTELLENTSPACEISIETSPALEIHER" 

40 SLIDJ 0: 5WiDIed: Pili=ö 

al INPUTSL 1) 

42 IFSLEII<OORSLEINS>INTIEL III I THENZ2 

43 IFELLTIC I THENST 

44 PRINT" CUP SPACEZON" 

45 PRINT" EUPZIWIEVTEL [SPAGEISTLECKCERACE 
YWERBE=KSPALEITAFELNESPAC EIKAUFENTERACE 
SIE" 

+h INFUTSWIT) 

47 IFSHITISOORSWILI<HINTESWETI I THENAA 

48 PRINT" CUP SPACE2OY" 

47° PRINT" CHRTIUMTERATC EIMIEWIELISPACEINOL 
LENTSPACEISIELSPACE} DASISPACFIEISISPACE) 
WERKALUFEN" 
Si INPUTPFii) 
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[ur —i mie (iD 2 Li En =) Es or) > . : SD DS mr me fo kei: 


RS i41FOXEc+2,21EnD 


s2 IFPilh<=e00Rftli<>iNTiPti}) THENAG 

33 IFKEIND@SLITIAPLEIIHSWIIIHPMIII THENST 
4. FRINT"CCLEAR DOWNN2 REDYTHRLSPACEIKAPI 
LA SBERZEITSTERPACE) ZUESPACESIKLEIN! (BELA 


335 FORA=1 102000: NEXTA 

54 GOT022 

=? NEXTHE 

Sg FORI=LTON 

59 Xili=d 

&0 NEXTI 

1 KrFeiooooo 

52 FRINT"CELEAR DONNS PURPELE SPALEIATSPA 

GEIULSPAGE)SCSPACEIMLSPACEIELSRACEIRLSPA 

CEITISPALEIUESPALEINITSPACEIG" 

65 FORZeiTO2o00:NEXTZ 

&4 FORI=1ITON 

453 IFPiDIcC=OORk (II =OTHENSO 

46 IFFIilISKEFTHENdGE 

47 KPapil) 

sd NEXTI 

57 FORI=1TON 

70 PRINT" tELEARF" 

71 IFKII=OTHENSS 

+2 IFSLIIICHOTHEN?FA 

73 VE=0: 607076 

74 VSEH=Sti WEIT DI RSOR (SWEII+ LI e150/ 

t1+58RIPIII-KPIF@PFITITI ZH WB /ZOH 

#3 WSITJl=INTiVSEIIReI+RND 1) #0.5-0. 251 

#4 IFVWSEII<eSLiTI THENFF 

77 WEGEIl=SGLETI 

#7 FRINT"CRLACK)Y"N# CT) 

30 FRINT"CFELLOWIen nn nun nt 
# 

4l FRINT"IDOHNZIVERKAUFTELSPATE}PORTIONE 

MNISPACESIETG: SALE "VE CTH 

82 PRINT“ (BLACK BOWHIERTEUGTELSFACEIPORT 

TIONEN SPACE#)EIS: CREDI"SLIDI 

93 GiTie-SLi1})#PLIDI=-SWITII@PWITI HVS TIP 

il) 

84 IFSLIII=OTHENG (TI =- CINTIRNDEII 25H I 

5 PRINT" CRLACK DOWWIGEWINN: ISPACET RED) 

DM"GeLI 

84 Kill=ekKil)4+Gtl) 

87 IFKiTISEISTHENFL 

88 KiT)=O 

07 PFRINT"{RED DOHK2IBANKROTTEBLACKI" 

#0 GOTOF2 

1 PRINT"{BLACK DOHWNZINEUESTSPACEIKAPITA 

LrsAcDpIDom"Kit} 

#z PRINTYIBLUE DOHNS4 SPACEFILEERTASTEISP 

ACEIDRÜECKENTBLACK}" 

72 BETAF: IFAfe" " THENFS 

4 FRINT"tCLEAR}" 

975 MEXTI 

75 PRINT"CRED SPATESIRANGLISTECBLACKI" 

7 PRINT" (YELLOW) ensesnseusnnunssssnasr. 


101 IFKIII<>OTHENLOS 
102. 78=75+1 

103 ZEITIeK(T) 

104. MEXTI 

165 ROsü 

105 FORK=1 TON 

107 EK=O 

iodg FORI=1ITON 

107° IFZEITISGKTHENL12 
10 GE=7KiI} 

Lili G=eI 

112 NEXTI 

ıi153 PRINTHE GI „"CHLWEH"KIG) "THBLACK DOWN} 


i14 IFKiGi >=IöoöTHeNkss 

115 ZEIG) =-L 

il& NEXTEK 

117- IFR=STHENG LO 

118 FRINT"CNOME DOHN2O SPASESHLEERTASTEL 
SPACE) DRUECKEN” 

117 GETAF: IFAF=""THENII$ 

SD ME=INTIRNDILIES+L) 

510 ONWEBOTOS20, 530, 540,550 ,560 

20 WE#="GEWNITTER“:GOTOSTO 

S50 WEF= "REGEN": GOTOSTO 

340 WES="BERWDELKT":GOTOSTE 

wel WEF=S"HEITER":GOTOSTO 

= WEF=S"HITZEFERIODE" 

570 WE=10sINTIRNDtLI#20H 

„00 IFWG< 110 THENAOO 

570 KG=o 

sb GOTOLE 

6i0 B=7827:C=39549 

420. PFOKEB, 23:1 POKEC, 2: FOKEB#+1 „F:POKEC+H „2 
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 HOMECOMPUTER-Abo 
zum Spartarif! 


Schon der altehrwärdige Sherlock Holmes be- 

merkte zu Dr. Watson: „Hatson, seien Sie doch 

vernänftie und komäiniere 1 Sie richtig!” Die- 

sen Rat möchte Ihnen die HOMECOMPUTER- 

Redaktion auch „mir auf den Weg" geben, Die 

Rede ist vom Kombinieren der beiden super- 

Magazine aus dem TRONIC-Kerlag. Sie erhal- 

ten nämlich in KOMBI-ABO sechs Hejte von 

HOMECOMPUTER plus sechs HEFTE von 

| | COMPUTRONIC für den Schlagerpreis von nur 

| 50,- Mark finchusive Zustellung). Das ıst der 

„Intand-Preis". Das europäische Ausland 
zahlt: (siehe Impressum). 

Natürlich können Sie auch nur den HÖME- 

COMPUTER abonnieren. In diesem Falle hal- 

fen wir ein interessantes wie preiswertes Ange- 


„Hallo, Sie da! Ja, Sie. Sie können sich auf uns ver- 
lassen! Mit einem SOFTWARE-ABO oder einem 
Abonnement des HOMECOMPUTER „liegen“ Sie 
bei uns genau richtig! Lassen auch Sie sich über- 
bot für Sie bereit: Für sage und schreibe 30 zeugen. Denn: Unser Service istschnell, zuverlässig 


Murk kommt der HOMEC OMPUTER frei 
Haus. Ein Tip für alle „Warsons": Schauen Sie 
sich einmal auf Seite 40 die Abrufkarte an, 
füllen diese aus und dann ab damit zum TRO- 
NIC-Ferlag, Postfach, 3440 Eschwege. 

Die HOMECOMPUTER-Redaktion wunschr 
schon jerzt viel Spaß beim Software-Abo und - 
natürlich = beim „Kombinieren“! 


preiswert!" 











Tja, man muß eben mit der Zeit gehen. f R Se) Al 
Streichhölzer und Zigaretten brachten N here | | 
nicht viel ein. Aber seiterden HOMECOM- | \S Pr ua | 
PUTER in seinem Bauchladensortiment a DE  ın1 082 

hat, geht’s mit ihm rapide bergauf! 


Super-Software-Abo 
für alle Systeme! Na, en das nichts ist? Sie bekommen die in- | 


feressanten, irren Programme nafürlich frei 





Seitdem wir im „HOMECOMPLTER" das 


Fin 








Super-Software-Abo für Sie bereithalten, er- 
reichen uns fast täglich Programmwünschte 
bzw, Programmbestellungen. 


Das Erfolgseeheimnis ist rasch auf einen Nen- 
ner gebracht: Preiswerrer war Qualitat eben 
noch nie! 

Denn, Sie haben die erscklassige und bequeme 
Möglichkeit, die rollen aktuellen Programme, 
die wir im HOMECOMPUTER vorstellen, zu eı1- 
nem Traumpreis zu ergattern! DasSOFTWARE- 
ABO gilt für allesystemeund kostet im Jahr für 
6 Kasseften ganze 69,90 Mark. Wir meinen, dies 
ist ein Preis, der sich sehen lassen kann! Das 
Abo ist auch für 6 Diskerten zu bestellen. Diese 
sind a rünstig und Fun ur 84,90 zu haben. 
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Haus, das ist klar. Außerdem haben Sie - falls | 
einmal ein Datenträger defekt sein sollte - ab- \ 
solutes Rückgaberecht - eine Garantie, die wir 
unseren Lesern und Kunden einfach 
schuldig sind. Beachten Sie jedoch 
auch, daß das Software-Abo nicht 
mit einem Zeitschrifter-Abonne- 
ment gekoppelt ist! Also, was gibt's 
jetzt noch zu überlegen? Ran an den 
„software-Speck". 


(Abrufkarte, siehe 5. 40) 






















„Müller, was haben Sie da?" 
„Das ist die'neue Abrufkarte, / =; a er _— 
Chef! „Alles klar!” gps EEE —— 
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HITPARADE %# WITZE %* 


„Hilferufe“ ® 


Wie die meisten von Euch sicher schon 
wissen, veröffentlichen wir unter dieser Ru- 
brik „Hilferufe" von Lesern, die Probleme 
mit Programmen haben. Ob nun der näch- 
ste Level nicht erreicht wird, ob man immer 
vieder an einer bestimmten Hürde scheitert 
- allem Anschein ist die Zahl derer riesen- 
groß, die sich bei'einem Problem gern von 
anderen helfen lassen möchten. Zumindest 
steigt die Zahl der Einsendungen von Aus- 
gabe zu Ausgabe rapide. Wie es scheint, hat 
unsere Aktion „voll eingeschlagen". 

Allerdines wissen wir leider nicht, ob den 
Ratsuchenden durch die HELPLINE ber ih- 
rem Problem geholfen werden konnte. Wir 
würden uns freuen, wenn Ihr uns Eure Er- 






























fahrungen hierzu mitteilen würder, Eure 

Zuschriften, gleich ob als Ratsuchende oder 

als „Errettete“, richter bitte an: 

TRONIC-Ferlag 

Postfach 870, 3440 Eschwege, 

Kennwort „Helpline“. 

Alle Feröffentlichungen sind kostenlos. 
(hez.) 





STRUGGLE (C-64): Data ERROR in Zei- 
le 80. Heinz Kluth, Fugger-Str. 3, 7913 Sen- 
den-AY. 

Atlantis (Atari 800 XL): Wie komme ich 
nach Atlantis? Mare Medinger, 7302 0stfi!- 
dern A Hauffstr. 9, 


53333 Mech-Strempt, 

Turbo Tape (Atari 800 XL): Ich suche drin- 
gend das Programm Turbo Tape für den 
Datenrecorder CX 1l Schreibt bitte an; 
Horst Ritter, Hauptstr. 46, 8400 Regens- 
bung, 

Mercenary (Atari 800 XL): Wie bekommt | 
man ein Raumschiff, um Targ zu verläs- 
sen? Wer es weiß, schreibt bitie an: Juan 
Jose Chiviie, Haupistr. 12, 7800 Freibure. 

MERCENARY (Atari 800 XL Kas.): Anlei- 
tung in Dt: Verstehe den Sinn des Spiel’s | 
nicht. Karin Schwertner, Hagdomstr. 44, 
010 Hilden, 

TRANSDISK (Atari 800 XL): Suche Helf- 
Programm für Boot-Tape nach Disk: z.B. 
Transdisk, Casdis., Scopy, Jim Hoile, 
Omega. Eugen Hofses, Heidestr. 36, 2040 
Antwerpen (B). 


GAME-HELPLINE 


Sie haben irgendein Problem mil einem Adven- 

ture-oder Arcade-Game? Wie oft kommi es vor, 

' daß man bei einem Adventure-Spiel einfach 
„stecken bleibt” und die richtige Lösung nicht 

findet. Ebenso haben viele Arcade-Spiele solch’ 

enorme Tücken, und man fragt sich, wie komm 

man in ein höheres Lerel? Wie kann man diese 
dämlich Tür denn öflnen? 






CHIMERA (Atari 800 XL): Ich habe schon 
den „Spanner“ und den ‚Waäarhead" ge- 
nommen, aber wie komme ich weiter? 
Ralf Müller, Fr-Stoltze-Sir. 43, 623] 
Schwalbach/Ts. 


The Hobbit (englisch) MSX: Wie gelange 
Donkey Kong/Kelzenheinz (800 XL Atari): | 
Wie bekomme ich Programm auf Disket- | 
te gestartet. Rainer Miehl, Rahnesstr. 19, | 


ich in die Ork-Höhlen? Wie bekomme ich 
das Boot vom anderen Ufer? Wer hilft, 
schreibt bitte an: Herbert Klaseck, Fockstr. 
7, 4670 Lünen 6, 

RAMBO (C-64): Wenn ich mit dem Hub- 
schrauber im Lager gestartet bin und ıns 
nächste Lager fliege, wo muß ich dann 
landen. Ruedi Greub, 1860 Aigle-Fotanney 
(CH). 

Cromwell House (Atari): Wer kann mir sa- 
gen, wie man den Zwischenstand abspei- 
chern kann? Stefan Meyer, Schinderweg 9, 
6733 Haßlach. 

Expedition (auf Kassette) Atari 8300 XL: 
Wie starte ich das Programm” Auf wel- 
cher Seite der Kassette ist es? Bernd 
Krebs, Sachsenweg IÜ, 3216 Niederkassel 6. 
Mediator und Asylum (Atari): Wie komme 
ich bei Mediator bei dem Glockenspiel 
vorbei. Und wie komme ich bei Asylum 
heraus, Maithiasstepponer, Möllendorfstr. 


| 36, 6750 Kaiserslautern, 


Keine Angst Hille nahi! Falls Sie bei.irgendeinem 
Spiel ein Problem haben, das bei Ihnen schlallose 
Nächte verursacht, oder cin Info-Problem haben - 
gleich welcher Art, so schreiben Sie uns. Füllen Sie 
den Coupon: aus und senden Sie ıhn an: HOME- 
COMPUTER, Tronic-Verlag, Kennwort „Helpline“, 
Pofilfüch, 340 Eschwege, 

Wir veröffentlichen Ihren „Hilferuf® Kostenlos: 


Mal Sehen, ob sich nicht jemand finder, der Ihnen 
helfen kann! 


System 





| bünener Lstr. III, 2800 Bremen 1. 





CLUB-INFOS %# HELPLINE | 


„Hilferufe“ © 


Escape from Earth (Atari 800 XL): Warum 
läuft das Programm nicht? Wer weiß, wo 
der Fehler liegt, schreibe bitte an: Jörg 
Feiler, Maxrain 10, 6446 Nentersi. 4. 
SPRINTER # (Atari 800 XL): Mein Läu- 
fer kommt nicht vom Hart weg! Wer hel- 
fen kann, schreibe bitte an: Järe Feiler, 
Maxrain 10, 6446 Nentersh. 4, 
GREMLINS (C-64): Wer kann mir den 
Lösungsweg des gesamten Spiels besor- 
gen. F Michels, 277772727? 
Adventureland (Spectrum): Wie kommt 
man aus der Lavahöhle heraus und was 
hat der dünne Baer damit zu tun? Frederic 
Dürkes, Schulze-Delitzschst, 0, 7000 
Sturteart 80, 

Schneider/CPC 464: Wie kann man bei 
den Adventure Warlord an den Warrior, 
der an der Brücke steht, vorbei? Lars Ni- 
lius, Alte Poststraße 19, 3162 Vetze-Hänig- 
sen, 

Mindshadow (Atari/C-64): Wer ist Wil- 
liam, wo ist William, was muß ich mit 
William machen? Oliver Müller, Barloer 
Wer 62, 4200 Baholt. 

TURBO-TAPE (Atari 800 XL): Suche drin- 
gend Turbo-Tape-Programm für Dataset- 
te 1010. Schreibt bitte an: Markus Müller, 
G.-Fr.-Händelstr. 5, 8853 Wemding. 
Schnellader (Atari): Suche Schnellader 
für Atari, Datenrecorder. Wer mir helfen 
kann der schreibe bitte an: Michael: Wa- 
gner, Magdeburger Str. 17,.6507 Ingelheim. 
Onest for tires (Atari BO0 XL): Beim 1. 
Teich mit den Schildkröten komme ich 
weiter, beim 2, mit dem Vogel auch, was 
muß ich aber beim 3. machen? Jochen 
Thielen, Davelstr. d, 4840 Rheda-WD. 
Turbo Tape (Atari 800 XL): Suche drin- 
gend „Turbo Tape“ für Datasette 101. 
Schreibt bittean: Dirk Thometzer, Hassel- 
broolerstr. 33, 2000 Hamburg 76. 

Mac 65 Assembler (Atari $00 XL): Wer 
schickt mir ganz dringend eine ausführli- 
che Beschreibung, evil. auch Utihties??? 
Bitte meldet euch bei: Axel Klaus, 
Hirschstr. 4, 7326 F-Heiher. 

Turbo Tape (Atari): Ich suche dringend 
ein „Turbo Tape“ für Atari 300 XL auf 
Kassette (Datasette 1010). Wer helfen 
kann schreibe an: Reimar von der Sand, 
Schillerstr. 4, 3418 Uslar, Tel, 0557 1,2742, 
Zim Sala Bim (C-64): Wie kommt man 
am Anfang weiter? Bitte schickt mir:die 
richtige Lösung! Stefan Mathias, 8051 
Palzing, Kirchstr. 5. 

Hacker (Sinclair Spectrum): Wer kennt 
die Interart bei Frage 4 (Level 4) von dem 
„security check"? Marco Schneider, Hasen- 
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| | en Heipline+ 
Der Spruch Hr. 1 


Manche Computer kosten ein ber- 
mögen. Manche nur den Verstand! 





- HILFERUFE | 


| 
| Spiele (Atari 800 XL): Suche Spiele jeder | 

Art auf Kassette, Angebote bitte an: Ralf | : 
Heby, Starleen Feldstr. #0, 8600 Bamberg. sic). Thomas Fritz, Posıfach 100220, 3628 
| 





Atari 800 XL: Suche die Spiele: Solo | Heiligenhaus. | 
Flight, Wintergames, Chimera, Silicon, SOLO-FLIGHT (Atari 800 XL): Suche | 
Jet-Boot-Jack, Ghostbusters und Fine | dringend Spielbeschreibung für 50lo- | 
Sorolling auf Kassette, Angebote an; /ngo | Flight. Wenn mögl, in Deutsch. ‚Peter | 
Figgen, Kirchstraße 42, 3143 Wasserberg. | Picki, Heimstr. 10, A503 Salzburg. | 
Time Tunnel, Karateka (C-64): Wie be- | Schloß des Grauens (Atari): Wer kennt die 
kommt man das Dokument im Jahr 1692? | Zauberworte und wo wendet man sie an? | 
Wie komme ich bei Karateka unter dem | Christian Schweda, Hannes-Greiner [2 | 
Fallgitter durch? Frank Claypool, Unter- | 6980 Wertheim 2 
\ .dorfstr. 5, 6719 Carlsberg 2. Richard Prettys Rennzirkus (Atari 800 XL): 
Tennis (Atari 130 XE): Wer hat selbst ge- | Ich suche das Programm auf Cassette. | 
schriebenes Tennis zu verkaufen? Biete | Angebote an: Thomas Vilsmaier, Fich- | 
ca. 15 DM (Maschinensprache oder Ba- | tenstr. 16, 8311 Markikofen. | 

















ICH RECHNE- ALSO BIN ich! 


Der Spruch Ür. 2 | £-16/116 - Fans aufgepaßt! 


Wer ım Computer mehr als ein C-16/116 User Club sucht noch viele Mitglieder. Wer mitmachen möchte, 
Werkzeug sieht, unterschätzt sich | kann sich eine Inf. unter folgenden Adressen beschaffen (gegen 50 Pf): 





selbst! Sven Martin Volker Huppert 
Ostpreulenstr. 3 Ferlingsweg 15 


| 3590 Bad Wildungen oder 4150 Krefeld 1 





Die Gewinner von HOMER’S Suchbild-Aktion 
Diese Action schlug, was die Leserresonanz anbetrifft, sämtliche Rekorde. Aus der „gewaltigen“ Masse an Einsendungen ermitteln 


wir folgende fünf Gewinner: | J, Wagner aus Wermelskirchen, e er ar mie 
Christian Walter aus Hom in Österreich, | Stefan Stepponat aus Kaiserslautern und Die neueste Rätselaufgabe Jin- 
Wolfgang Keller aus Zell a. h., Olaf Richter mit Wohnsitz in Berlin 65. | det Ihr auf Seite 73! 











Wer zerstört hier wen??? 
Mit diesernachdenklich stimmenden Zeichnung, verdiente sich Uwe Pferr, einer unserer 
Stamm-Karikaturisten, seine 30,- DM Honorar! 
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a ee El FP.T. mW r | Club-Infos # Helpline # 


„Die_Computerszene 
bleibt in_ Bewegung” 


Computerclub Ruhrgebiet 


Der Computerclub Ruhrgebier bestehr seit Anfanz des Jahres 1986 und wurde 
unter der Schirmherrschaft des Jugendwerks der Arbeiterwohlfahrt Essen gegrün- 
der: Der Zusammenschlußmiteinem Jugendv erbandbringt fürdie Cluhmitelieder 
etliche Vorteile mitsich, 2. B. unterstützt. der Verband unseren Basic Kurs mit eini- 
gen Computern, und stellt uns seine Räume und sonstigen Einrichtungen mit zur 
Verfügung. Aus diesem Grunde kann der Clubbeitrag auch sehr klein gehalten | 
werden. Er beträgt nur eine DM im Monat! 

Was macht der Chb? 

Der Chub möchte vor allem Computer User aus dem Rultrgebier ansprechen. Wir 
machten kein Clubleben, das sichnur per Post abspielt, sondern die Mitglieder 
sollen die Möglichkeit haben, miteinander den Computer zu erleben, | 
Es gibt eine unregelmällig erscheinende Clubzeitung, es werden Kurse und Fortbil- 
dungen angeboten, eine Programmbibliorhek gibt's auch, es können gemeinsame 
Wochenenden gefahren werden und man ist halt zusammen. 





Karikatur zum 
| Schneiderbefehl, ,TIME“ 





















Interessierte werden sich an: Pferdemarkt 7, 4300 Essen I 
C/O AWO Jugendwerk Essen 





An alle Schneider-Freaks! UA TIL RT 


SV.A C. Schneider Computer ne (5.G.). 2 der Veröffentlichung unserer letzten Hitliste 
ha af Lanasi_ | Sind mittlerweile # Monate ins Land gegangen. Aber nicht nur au 

Club hat noch Aufnahmekapazi- Grund dieser relativ langen Zeitspanne hat sich innerhalb Le 
taten frei! Chartplazierungen einige getan. Von 20 plazierten Programmen 

AN EINE aus der letzten Hitliste konnten sich dieses Mal ganze 7 in der aktır- 
Der SY.AC. sucht noch neue Mitglieder. Gebeten | ellen „Top Twenty“ behaupten. Allein „WINTERGAMES“ als un- 
wird u.a. eine monatlich erscheinende Zeitschrift | angefochtener Spitzenreiter und das Programm „Raid Over Mos- 
mit wertvollen Infos, tollen Tips und Tricks, Listings | cow“, das dieses Mal von Rang 12 auf Platz 4 vordrang, scheinen 
etc, Interessierte Schneider-Fans sollten sich | sich durchsetzen zu können. | 
schnellstens unter nachfolgender Anschrift infor- | Homer ist nun gespannt auf die nächste „TOP 20 LESER CHART“, 
ABLE C: die im Homecomputer Nr. 7 veröffentlicht werden wird, 


5..A.C-Computerclub, Bei Mackner, Fär- | nr: | a | 
berstr. 20, 8410 une Tel. 08336/7105, Die aktuellen Plazierungen 


(Plazierungen unserer letzten Top 230 in Klammern) 


il) Wintergames (C-b4 Alan/Spectrum) US GOLD/RUSH WARE 
#-) Little Computer People (C-64) ACTIVISION 
4-) Rambo (C-64Schneider’Spectrum) 
412} Raid over Moscow (C-64/$pectrum) US GOLD/RUSH \ WARE 
s(-)} Summergames (C-444Atari/Speclrum/MSX) EPYCS 
ti-) Koronis’ Ril (C-64 Atari) LUCAS-FILM 
705) Ghosibusters (Speetrum/Schneider/Atan/C-4) ARIOLA 
#(-)} Top Tennis (C-64} THE GAMES 
%-) Goones (Alun/C-H4/Specirum) US GOLD 
10i-) Invasion 2001 (C-64) KINGSOFT 
Ilf-} Who dares wins! (C-64/Schneider/Atan/C-64) ARIOLA 
I%-) The Eidelon (C-64/ Atari) LUCAS FILM 
IHM-} Boulder Dash (C-HWAlari/Spectrum/MSX) ARIOLA 
144] Impossible Mission (C-64/5pectrum) US GOLD/RUSH WARE 
I15{13) Fußball Manager ($pectrum/Schneider/C-64/C-16) ADDICTIVE 
 16(-) Bomb Jack (C-64/5pectrum/Schneider) ELITE 
 INIT) Hacker (C-64/5 pectrum/Schneider) ACTIVISION 
ı 18/-) Pole Position (C-64} TRONIC-Verlag 
ı 1M-) Hanse (C-&VCPC) ARIOLA 
I NM-) Witcheraft (Spectrum) THE GAMES 


_ — ET = = = [ZZ 
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Die Ravensburger Spielesammlung ist wahrscheinlich so alt wie der histori- 
sche Teddybär. Jedenfalls wurden diese Spiele schon von unseren Großvätern 
gespielt und sind heute noch genauso aktuell wie damals. Dies BETT 
der Grund dafür. daf immer mehr dieser betagten Brettspiele auch für die ver- 
schiedensten Rechner entwickelt werden. Man denke nuran die Unmenge von 
Schachprogrammen. Auch Monopoly oder „Mensch ärgere dich nicht“ sind 
# schon als Computerprogramme erschienen. 





| CPC 464/664/6128 





Tolle Simulation des 
bekannten Bretispiels 








Zur Eingabe 

| Die Programmzeilen wurden in 10er | Programm übersichtlich zu gestalten, 
| Schritten eingegeben, sodaß der AUTO- 

Befehl eingesetzt werden kann. Um das 


wurden die einzelnen Programmzeilen 
möglichst kurz gehalten. 








Wir veröffentlichen hier nun das bekann- 
te MÜHLE-Spiel. Das Programm besitzt 
alle Optionen, die man. von einem 50l- 
chen Spielprogramm erwartet. Integrier- 
| te Spielanleitung und freie Wahl der | 
Spielstärke des Computers (Levels | - 





leicht - bis 4- schwer -), wodurch die Re- 
chenzeil des Computers bestimmt wird. 

















Unterhalb des Spielfeldes wird sowohl i 
der Computerzug als auch der letzte des 
Spielers angezeigt. 
u } = 
Die Steuerung des Pro- 
gramms: (demonstriert an 
einem Beispielzug) | 
Stein setzen : AL (ENTER) 
| ‚Stein setzen 
\ und einen enilernen : A1G7 (ENTER) 
Stein ziehen - ALDLIENTER) 
Stein ziehen i een HT 
innen : 'ALDLG7- ohne Kalkulieren Sie vorher das Risiko ein. Sonst ergeht es Ihnen ähnlich 
(ENTER) | wie unserem „Helden“ auf dieser Abbildung, der am Boden zerstort 
Ä ist! 
KL - : | u - 
Mühle: Das Listing 
io INK 1,25: INK 0,0:BORDER 0:MODE 1 | 200 PRINT 
26 FOR i=1 TO I325PRINT:NEXT i | 210 GOTO 280 
30 SPEED KEY B,1 220 PRINT" "3 
40 PRINT 230 FOR iet TO v-i1 
so Be Rein lautet Dein Name "3 240 PRINT"#"; 
50 n#eInt 250 NEXT 
70 IF n#=CHR#(1LT) THEN 120 260 PRINT"#" 
| Bö namefenamet+UfrPERF inF#) | 270 RETURN 
70 ON Sat) GOSUR 7810 280 FOR i=1 TO 4:PRINT:NEXT 
ie EEE RN) name* 290 ON S0t1) GOSUB 7810 
| | 300 IF INKEYS="" THEN 290 
120 n$enames: IF LENin#}>21 THEN PRINT:IPR 310 FOR p=1 TO 32: PRINT:NEXTIPRINT" 
INT" Zeichenkette zu lang !"ıPRINT:GOTO MUEHNLE" 
ne H | 320 FOR P=i1 TO 12:PRINT:NEXT:PRINT"Wird 
130 v=eLENin#]+1& t eine Anleitung 
140 FOR nz TO 20: PRINT:NEXT benostigt ";UPPERFINFIF" Id)a thNlein 
150 GOSUB 270 " 
{50 PRINT " #"3sPRINT TABtLENIn#I+1B)"* 330 an#=INKEY$ 
n 340 ON Sü0t1) GOSUB Palo 
170 PRINT " * Guten Tag ";n#j:PRINT TA 350 IF UPPER$tan#)="J" THEN 9210 
B{LEN{n#} +18) "#*" 340 IF UPPER${anf)="N" THEN 9710 
{80 PRINT " #"; TABILEN In#) +18) "*' 370 GOTO 350 
ı70 GOSUB 220 | u = Ta a ee a ER TR ee a Eee 1 12 2e one ne en en 





August/September '86 Homecomputer #7 


| "AUEHLE VERSION 1.0 7 ECPC 454 +++4+4++ 


'20.03,198& MARKUS MUNCK +++44+4+444+4+ 
A ee a a ES nn 
‘DEFINITION DER FELDER ++444 44444444 
+ tt Hr Hr HH HH HH Hr 
DIM F(24) ‚Ki ,L(#) 

DIM Z(24) ‚Ni24,4) 

DIM Mil8,3),X(24,2), 724,2) 

DIM 117,7) 


. DIM At24) ,„DO(24) 


DIM G(4,255) ,T{i2,11) 

DIM Will: ,Fiil) ,Ocli} 

DIM Bi19) „Ci33) ,Di7% 

Te a a ee a a ae ee ee 
"INITIALISIERUNG rt 


tt 


a a a a a a a 


0 FOR I=s1 TO 24 


Filje0 

NEXT I 

Be ee ee a a a a ee ze 5 ++rtr+++tr+ ++ tt HH Hr 
RESTORE 

HH HH HH HH 
FOR I=1 TO 24 

READ Z{iT) 

FOR Jei TO 4 

READ M{I,J) 

MEXT J 

NEXT I 

I a a ee SEP Eee Re ee Ir ee Ver error ae Terre Terre ee 
FOR I=i TO 1& 

READ J 

FOR J=ei TO 3 


| READ M{I,J} 


MEKT J 


"NEXT I 


ee en nn 
FOR I=si TO 7 

READ J 

FOR Jeil TO 7 


’ READ IiT,J) 
IF IkI,JJje0 THEN 890 


AtTDiEI,JI)ImJ+654 
DEIGI,JgI)=I 
NEXT J 


' NEXT I 


a ee ee ee ee ee en 
C=ü 

Com? 

C9=9 | 


NEE 
) 50=9 


5I9=7 

+httrtth re 
FOR Iei T0 32 

FRINT 

NEXT I 
ee 
PRINT"Welche Epielstaarke (1-4) "; 


1040 IMPUT TO 


nic 
10970 
1109 
1110 
1120 
1130 
1140 
1150 
1150 
1170 
11809 


PRINT 

TO=1INT iTO+r0.5) 

IF TO>0 THEN IF TO<S THEM 111 
FRINT"Diese Spielstaerke ist leider 
ht moeglich ";N# 


FOR I=1 TO 20: PRINT:NEXKT 
FRINT"Moechtest Du beginnefh "+N# 
PRINT 

FRINT"i(Ja=1/Nein=ö)"; 

INPUT J 





FRINT 


J=1NT iJ+0.5) | 


| 


4 HOMECOMPUTER 


1190 IF J<ö THEN 1120 

1200 IF J?1 THEN 1120 

1210 CL5 

1220 "INITIALISIERUNG TEIL 2 +#++++44+4++++ 

1230 FOR Ii=i1 TO 8 

1240 KtMiI,1),13=Mil,2) 

1250 XiM{1,1),2)=Mt1,3 

1250 K(MiI,2),1)=HMil,1) 

1270 KıM(I„23,2}=Mi1,3) 

1280 KiMi1,3),1)=Mi1l,1) 

1270 KiMil,3),2)=HMil,2) 

1300 NEXT I 

1310 FOR I=# TO i& 

1320 YimMil,13,1}=eMi1,2) 

1330 YiM{I,1),Z23=eMiI,5) 

1346 YiMil,2)3,1)Jehil,1) 

1350 Y(iMt1,2),2)=eMt1l,53) 

1320 YiM<I,S3, 13=Mil,1) 

1370 YiM(T,SI ,Z23=MiI,2) 

1380 NEXT I 

13970 GOTD 38350 

AO Het HH HH 

1410 'ERSTELLUNG ALLER ZUEGE FUER F +++ 

1470 rt 

1430. Fi=-F 

1440 DM SEN {F}I*+2 GOTO 1470,1450,1510 

1450 "FALSCHE WERSOREUNG +HHHHHHtHHH rt 

1450 STOP 

1470 "ZUEGE. FUER DEN RECHNER +#+4++4++++++ 

1480 MO=7-56N {69} 

1490 IF Co<=3 THEN Mö=3 

1500 GOTD 1549 

1516 "ZUEGE FUER DEN SPIELER +HHtrHHHr +++ 

1520 MO=2-S6HN 59) 

1550 IF 50<=3 THEN MO=} 

1546 "POSITION DER STEINE +#++HH+++H++++ 

1550 Kal 

1550 L=0 

1570. FOR. I=1 TD 24 

1580 DN F#FtI)+2 GOTO 1590, 1540, 1820 

1570 Kak+l 

1300 Kikl=1I 

1510 GOTD 1840 

1620 LeL+1 

15350 Lillel 

1540 NEXT I 

1550. "LOESCHEN DER NICHT SCHLABSBAREN 
GEGNERISCHEN STEINEN ++++++++++++ 

1&ä0 FOR Iel T0 14 

1570 IF FiMtI,1))<>Fi1 THEN 18506 

1580 IF FiMtI,„Z2))<c>Fi THEN 1830 

1570 IF FiMtI,SI)<>Fl THEN 1830 

1700 Mei 

1719 Nel 

1720 .0N SGN tKiNI=-MII,„MII+Z GOTO 1730,17 

0,1810 

1730. NeN+1 

1740 IF Nd=sK THEN 1720 

1750 GOTO 1830 

1740 Kak-1 

177G IF K<N THEN 1830 

1786 FOR G=N TO K 

1790 KilDiekK (0+1) 

IS00 NEXT 0 

1810. MeM+i 

1820 IF Mi=5 THEN 1720 

1830 NEXT I 

1840 '+HHHHHHh HH hr 

1939 "WERZWEIGUNG IN DIE BREI ZWEIGE ++ 

1850 "AH 4H HH HH HH 

1870 G=PiT-1) 

1BEH ON MO GOTO 1890, 2120,2410 

1890 "SETZEN DER STEINE +#+4+4++4+4+++ +++ 

1900 FOR I=i TO 24 

1710 IF FtII<>O THEN 2080 

1920 IF Keö THEN 2040 

1930 IF F<>FIXtI,1}) THEN 1950 

1946 IF F=eFikt1l,2)} THEN 1970 

1950 IF F<>FitYil,1)) THEN 27040 


1760 IF F<>FiYtl,2)) THEN 2040 


1770 FOR Je1 TO K 
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1980 GeG+i 

1790 Gil,E)=0 

2000 Gi2,Gl=I 

2010 Gi3,G)=Kil) 

2020 NEXT J 

2035. G0T0 2080 

2040 G=G+1 

2050 Gil,G)=0 

2040 Gi2,Gl=I 

2070 Gi3,G)=0 

2080 NEXT I 

z0#70 PIT)I=G 

2100 GeG-PiT-1) 

2110 RETURN 

1720 "ZIEHEN DER STEINE +44+++HHrrH+++r+ 
2130 FOR. I=sl TO L 

P=eLi1} 

2150 FiPI=0 

2150 FOR J=i1 TO ZiP)h 

2170 Pi=NiP,J) 

180 IF FiFi}<>0 THEN 2350 

2170 IF K=0 THEN 2310 

"200 IF F£}FiXtPi,1}) THEN 2220 
2210 IF FeFikt{iP1,2)) THEN 2240 
=2220 IF Ft>FtYiPi,1)} THEN 2316 
2930 IF Fe>FiYiIPL,2)) THEN 2310 


2270 GiZ2,6G1=P1 

2280 G(3,G)=KiJl] 

2290 NEXT Ji 

2300 GOTO 2330 

2310 G=G+1 

2320 Gil,B}=F 

2330 G(2,6)=Pl 

2540 G13,6)=0 

25350 NEXT J 

73450 FiPl=eF 

2370 NEXT I 

2380 PITI=G 

2390 GB=e6-F(T-1) 

2400 - RETURN 

2410 'SPRINGEN DER STEINE +++44+44+++r+++ 
2420 FOR Isli TDL 

2430 FeLiI) 

2440 FOR J=ei TO 249 

»2450 IF FiJ}<>0O THEN 2550 

2440 IF K=0 THEN 2510 

2470 FiPl=0 

480 IF F<>FtktlJ,1)) THEN 2500 
2490 IF FeFtkiJ,2)) THEN 2520 
asoo IF F<>FiYid,1)} THEN 2500 
2510 IF F£>F(YiJ,2)) THEN 2600 
2520. FOR Jiel TOK 

2350 GeG+l 

2540 Gil,6G}=P 

2550 G(3,8)=Kk(J1) 

2570 NEXT J1 

2580 FiP)=F 

2590 GOTO 2550 

2500: FiFi=F 

2810 G=5t1 

2520 Bil,G)=P 

2430 Gi2,Gl=eJ 

2540 Gi3,G6)=0 

2s50 NEXT J 

2660 NEXT I 

Fr PiTIeß 

2680 GeG-FiT-1) 

2590 RETURN 

2700 rt 
>710 'VORSORTIERUNG DER ZUEGE +H+H+++t+r+ 
2 
2730 W7=ePiT-11#1 

2740 B7=P(T) 

be ee ae a On Ve Eee Be a ae 0 a a 2 2 a a a zz 
>7&0 IF W7>=B7 THEN RETURN 
2770 IF MFel THEN 3100 

2780 IF T;>=T0 THEN 3190 
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Id Nee Se Se TE SE SE Sc 2 225 320 22 27 22 ur 75 SIE 22T SL EL BEL SET SE BEL BEL ui vd 2a 2 2 nn on = 
FOR.F=W7 TOD B7- 

ON F+2 GOSUB 3300,7740,3580 

GOSUB 40850 

Gt4,Pi=-Wer 

OM F+2 GOBUB 3440,7740,3720 


NEXT P 


FOR I=V7 TO B7-1 


) WeG (4,1) 


P=1 

FOR J=I+1 TO B7 

IF Gt4,J)c=W THEN 2930 
W=G14,7) 

F=J 


1 .NEAT: U 


IF P=I THEN 3050 
WeGii,l)} 
G(1,D)=6(1,P} 
Gil,Pi=k 
W=612,8) 
Gi2,Fl=M 
W=eG(3,1) 


0 613, 1=61{3,P) 


G(3,FleW 

g14,P}=6(4,1 

NEXT I 

Be Eee TER ER WE Neue ee See Ne Eee Be Su Zr rn SEE SZ EL SEE u2 a Zn ne 
MF=ü 
tt 
RETURN 

"KILLERZUG NACH WORN Herr 


 PO=WF 


Pau? 
IF Ti2,T1<>612,F) THEN 3230 
IF TiL,TI<>HGt1,PI THEN 3250 


’ Gtl1,Pl=Gii1,PÜ) 


612,P}=Gi2,P0) 
W=6Gt3,P) 

Gt3,P}=613,F0) 
Gt1,POJ=Tt1,T) 
G{2,P0l=T{2,T) 


 Gi3,POJ=W 
; PO=Pü+1 


ee ee TEE ni 
IF W=0 THEN RETURN 
rt 
P=P+1 

IF Fi=B7 THEN 3130 
+ 
RETURN 

BEER ER or Tue a ar ar ee De a 0a Sun Sun SE EEE SEE SZ BEL BEE 25 2ö ul vi nz 
"AUSFUEHREN EINES COMPUTERZUGES ++ 
rt 
IF Gil,P)=0 THEN 3380 

FiGil,P})=0 

GDTO 3380 


 CF=CH-1 


CeC+i 
FiGt2,P}i=-1 
IF 6{3,Pi=0 THEN RETURN 


 FI(Gt3,PI)=0 


S-3-1 

S0=50-1 

RETURN 
tt 


"ZURUECKNEHHEN EINES COMPUTERZUGES 


er 


IF Gtl,Pil=0 THEN 35009 
FiGt1,P})e-1 

GOTO 35320 

CHecHri 

Caf-1 

FiGi2,P}l=0 

IF G6t3,P}=0"THEN RETURN 
FiGi3,Pl)el 

SuS+] 

Ss=50#+l 

RETURN 

Me BER BER ER NER ae NS See Sn Se 0 1 SE SEC SE SE ec De 2 227 22 2 2 2 u u nn 


"AUSFUEHREN EINES SPIELERZUGES +++ 





a or Io a DE TEL EEE EEE ES 


, 59=59-1 


IF Gi1,P}=0 THEN 5780 


ı GOTO 800 


' IF Gi3,P}=0. THEN RETURN 


' Bilüöl=0 


NEXT I 


Da en a a 1 Eee ee De Be 1 2 ee De ne 


| Mao 


' BOTO 4290 


 AsSGN iA) 





IF Gt1,Pl=0 THEN I440 
FiGt1,P)}=0 
GOTO 3550 


S=5+1 

Ft6(2,P})=1 

IF G(3,P}=0 THEN RETURN 
Fi6(3,P})=0 

Cet-1 

CO=L0-1 

RETURN 

e +++ +++ 2444 I 44H HH HH HH HH HH + 
"ZURUECKNEHMEN EINES SPIELERZUGES 
I 22. 50 20 322 57. SZ 220 SE SEE EEE SZ SEE SEE DEE CT BE Bz5 u 20 2 220 072 ST Bee See a ee 


FiGi1,Pi)el 


59=59+1 
SuS-1 
FiGt2,P})=0 


FiGiS,Plle=e-1 

Cac+l | 

CO=eCco+1 

RETURN 

Mn 25 Si 2a BEL 220 20 27 20 2. 22 27 227 SL 22 02T BE 2 SL EZ 25257 227 2707 77 2 27 7 
"INITIALISIERUNG DER BEWERTUNG +++ 
ee tr tt 
FOR I=1 TO # 

READ Bil) 

Bi20-T)e-Bil) 

NEXT I 


FOR I=]1 TO Is 
READ CiI) 
C1i34-I}=-C1(1} 


Cii7}=0 

FÜR I=i TO I 

READ DiI) 

D(34-I)=-DII) 

NEXT I 

Di17I=O 

"SPRUNG IN DIE- SPFIELSCHLEIFE +++++ 
DON J+1 GOTD 5550,5530 

ee ee 
"BEWERTUNG FUER RECHNER ++++++++++ 


"ZAEHLEN DER MUEHLEN +4444 444444 + 
Ho=d 

Mi=d 

M3=0 

FOR I=1 T0 1& 

N=0 

Aub 

FOR J=ei TO 3 

DOM F{iMLI,„J})+2 GOTO 4190,4250,4220 
IF A>O THEN 4270 

A=A-1 


IF A<O THEN 4270 

Amfa+1 

GOTO 4280 

MeMi{i,l} 

GOTO 4290 

JeF 

Auo 

NEXT J 

ON ABStA)+1 GOTO 4600,4600,4310,455 


FOR Jei TO ZiN) 

MiI=N{N,J) 

IF FiNMII<>A THEN 4450 = 
IF MiI,1)=Ni THEN 4450 

IF M{I,ZI=Ni THEN 4450 

IF MiI,3I=hi THEN 4450 

Jad 

DN A+2 GOTO 4400,4450,4430 


UI: 
H': 
L|: 
E 
Ss 
C 
| 
n |: 
e: 
|: 
d|: 
e |: 
ri: 
c) 
P 
C 





00 MO=MO+1 
IF F=1 THEN M2ei 
 G0TO 4450 


10 IF F=e-1 THEN M2e=-1 
ı NEXT J 


' GOTO 4500 


0 MO=MO-1 


’0 Mi=Mi-1 
I NEXT I 


Te ee ee ee a a a a a a a 


© 'FUER’S ERSTE ENDE DER BEWERTUNG + 
\ W=B 10-60-5033) +0. 117-MO)+DEL7-H1) 
 WO=RND (0) 


E80 WO=WO-FtDI#Zt0) 


) LOCATE 3,25 


| WITI=EWIT-2) 


' IF 50653. THEN 35210 


et 


FaQiT) 


' ON SGNIH-WITII+Z GOTO 5140,5170,518 


’ DtT}ep 





Mö=Mö-1 


IF J=eä THEM 4400 

DN A+2 G0TO 4460, 4800,4520 

IF C9=0 THEN IF Cö<>3 THEN 4800 
MO=MO+1 

IF F=el THEN M2el 





IF 69=0 THEN IF S0<C>3 THEN 4400 


IF Fe-1 THEN Ma=-1 
GOTO 4500 | 
ON SEN(A)+2 GOTO 4570,4600,4590 | 
Mi=Mi+1 | | 
GOTD 4600 


Er I nn nn 
WeW+n2#0.7+ SGNI(MO)I=O,22 
FOR I=1 TO 24 


NEXT I 

Wehu+kürd,. Ol 

I 1 SE SEL 22, BEL SEE 220 22 22 02, 222 22 22 22 2E 22 SE 22 22 222 255 220 22 2 2 ZZ 22 ZZ 
Mr=i 
Hr 
RETURN 
ht 
"SPIELER HAT VERLOREN ++4++4+4+++++++, 
Er En 


PRINT"Du hast verloren." 

END 
Te a a ne 7 
"COMPUTER HAT WERLOREN +HHHrHtrtrtHH + 
rt 
LOCATE 3,25 

FRINT"Du hast gewonnen." 

END 
I u SS SEE Ze 12 7 22 22 22 22 220 320 25 20 2 EU 2 
WERSCHACHTELUNG SPIELER ++#+++++++ 
ee a a 2 2 2 2 2 ne Zn ZZ 


T=T+1 
tt 


Ir a BR op DER BER OR Wr a Baer Wr ar EEE ae 52 Se 2 BE EEE 355 225 222 225 220 22 22 
Fei 


GOSUB 1400 

ae a DE ee 2 2 22 2 u 2 U 22 2 2 2 2 2 SET ae BET BE 0 u u 
IF G=0 THEN 5210 

D{TI=PiT-1)+1 

GOSUB 2700 
rt 


Ad er ee ee ee ee Se De ze ee u Bee 2 22 2 227 22 22 2 2 
GOSUB 3589 

IF T=TO THEN 5110 

GOSUB 5240 

WeWiT#+i1) 

P=DIT) 

EOTO 5120 

GOSUB 4050 

GOSUB 3720 


WITI=W 
Ti1,N=6t1,P) 
T{2,TI=6t2,P) 

IF We=WiT-1) THEN 5210 
Pauf+i 
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"5200 IF P<=P(T) THEN 5040 
irrt 
Sa20 Fe-l 

“2350 T=T-1 

ee ee ee nn 2 22 
5250 RETURN , 
+ 
#270 "VERSCHACHTELUNG COMPUTER (3+) +++ 
Feen = Du ana or 15 SE SE ur Se SE ne En EEE un 
s290 TeT#l 

53500 WITI=SWIT-2) 
tr 
320 IF Co<3 THEN 5500 

ee TE TE Zn u 
53540 Fe=] 


1.15 Ta Se Va Ber Sa 220 SE SE STE 2 72 22 2E7 BET BEL 25 22 2 2 2 ZZ Eon 
, 5360 GOSUB 1409 
0 0 Ta oe Se u Son Sn 1% SE SE SEC 22 15% 2er 22 2a D2 225 22 IL 22% 22 0 ul nl nen ni vi van zu 


5380 IF G=b THEN 56500 

390 OCTI=PiT-ij#i 

5400 IF T<TO THEN GOSUB 2700 
tt 
2420 P=G(T) 
ar Hr 
5440 GOSUB 3300 

s450 IF T=TO.THEN 35500 

5450 GOSUB 4870 

5470 W=W(iT+L1)} 

5480 P=ßiT) 

5470 GOTD. 5510 

5500 GOSUB 4050 

5510 GOSUB 3440 Fer 

se20 ON SENIMITI=-WI+2 GOTO 3530,5540,557 
8) 

5550 WITI=H 

5540 T{l,T}=Gil,P) 

s550 Ti2,T)=G(2,P} 

ssal IF Wr=eWiT-1) THEN S4A00 

5570 P=P+l 

5580 DITI=P 

590 IF P<=P(T} THEN 5430 

bat a Tu ae u eu 2p 20 SE Sn Sn SR SD BE SE 2 U u 5 2 a 2 a un al 20 un zn ne zn 2 
Saldo Fei 

5420 T=T-1 
+ 
5440 RETURN 

ta ae u no en une 
Eahö "LOMPUTERZUG er 
rt 
5480 GOSUB 7440 
tt 
=700 IF CO<3 THEN 4810 

s710 Fe-1 

5720 T=3 


. 5730 IF C9+59>2 THEN T=4 


5740 IF CO=3 THEN T=4 

=750 IF 50=3 THEN T=4 

Srab P{iT=-1) =0 

5770 GOSUB 1400 

S7B0 IF G=ü THEN 4810 
at 
5800 Fel 

s810 IF Geil THEN 4000 
Et 
930 IF C$iF THEN 5780 

‚, SB40 P=INT{12.5+56N1{RND tO)-RNDCOII# 1.5 
&#INT {RND (0)+0.5))) 

seS50 IF 59=7 THEN 5000 
tt 
SB70 B=0 

sa80 FÜR I=i TO 24 

Saro IF Fil)<>i THEN 3750 

700 FOR Jei TO Z{T) 

5910 G=eG+1 

5720 Gil,G)=0 

=930 Gi2,G)=NiI,J) 

590 GiS,Gl=0 

5950 NEXT 4 

Sgä0 NEXT I 

5970 FiT}=8 

EEE ertrtrrt 
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5790 GOSUB 5120 
hr 
5010 GOSUB 3300 

5020 "PRINT Heer 
5030 LOCATE 2,21:PRINT CHR#FL1iB} 4 ıLDCATE 
2,21:PRINT"Computerzug : "5 

&040 FOR I=1l TO 3 

050 J=B(I,P) 

50&0 IF J>O.-THEN PRINT CHRFtALIIIHDIJIH 
5070 NEXT I 

&0B0 FRINT 

ee ET nn nn nl nu 
5100 GOTO 5530 


tr 

&130 "BESTIMMUNG DES BESTEN 
EOMPUTERZUGES HH 

Bad "art 

&150 PF=0 

6lä0 Mel 

5170 H{T-1)e1E+20 

&iBd KITI=S-1E+20 

5179 DETI=PIT-I)#l 

5200 IF T<TO THEN GOSUB 2700 

tt 

5220 "UND JETZT DIE GROSSE SCHLEIFE ++ 

I 0 ae a ur EN Sn SEE ee 2 220 22 220 222 25 200 2 25 25 20 22 un zu nun Ze 


6250 P=Q(T) 
et 
arro GOSUB 3300, 

s2B0 IF T}=TO THEN 5330 


4300 GOSUB 4870 

6310 WeaWiT+l1) 

5320 P=eü(T) 

6339 GOTO 5359 

5340 GOSUB 4050 

5350 GOSUB 3440 

5360 IF WieW{T) THEN 4390 

4370 WiTJek 

5380 P9F=P 

6390 Pef+l 

4400 QLTI=eP 

all IF P£=PiT) THEN 52680 
ee 1 Se ne 7 1 SET 77% 57T 225 22 12% 25 255 220 2 20 ln 20 udn udn 25 DE aD cz 
5430 'ENDE DER GROSSEN SCHLEIFE +rr++t+ 
HH ++ 
5450 PaP7 
et 
6470 IF T>=TO THEN RETURN 
rt 
4490 PRINT 

#500 PRINT 

FRE u Be 2 E12 32 2a 222 Dun en 2 2 7 22 7 EEE 5 22 22 22 un 2 Zn 
5520 RETURN 

Arm fu 16 Mala un 22 1 LE 22 255 220 2un SE 25 In SE SE a ES u 25 DE nn nz 
65 "SPIELERZUG +HHHHHHH + 
Full u ade En 020 2 Sen En en BEE 2 SEE 22T EZ. 227 25 2272. 220 222 22 2E un u En 
5540 GOSUB 7660 


3580 IF 50<3 THEN 4750 

art Fei 

&s00 Te} 

5410 PiT-11=6 

4420 GOSUB 1400 

#630 IF G=0 THEN 4750 

I 2 C55 See Tre 77 BE 1 32 527 227 S22 222 02 22% 222 255 22% ze 2u5 22% 220 227 220 2EL 2Z ud u 
4450 "EINLESEN DES SPIELERZUGES +++++++ 
tt 
5570 PRINT CHR# (7) 

5480 LOCATE 2,23: PRINT CHR# {18} 35: LOCATE 
24 23: PRINT"Dein Zug "Ns" 7" 

6690 AAAF=INKETE 

5700 IF Akks="" THEN 4590 

5710 Vo=ASC (UPPERF (AAAF)) 

6720 IF Wo<c55 THEN 4690 

4730 IF wWO+71 THEN 4490 

5740 PRINT CHRFIWOI SF" "5 

6730 BEBF=1INKEY# 

4750 IF BBB$="" THEN 5750 


HomEcoMmPpuTeR 51 


6770 
6780 
6770 
5800 
5810 
#820 
6850 
6840 
6850 
66 
&870 
5889 
570 
6700 
#F10 
4920 
6730 
5740 
| 5750 
| 6960 
6770 
6780 
5970 
7000 
7010 
7020 
FOZO 
7040 
7050 
7050 
070 
7080 
FORO 
7100 
11o 
7120 
7130 
7140 
7150 
T1&0 
7170 
7180 
7190 
7200 


7210 


Yi=ASC(BBB$) 

IF v1<49 THEN 5750 

IF w1>55 THEN 4750 

PRINT CHRELVLIG" "; 

CEC$=INKEY# 

IF CCCs="" THEN 2810 

NO=ASC (UPPERF ICCEH) ) 

IF Nö=15 THEN 7410 

IF NO<55 THEN 4810 

IF NO>7i THEN &810 

FRINT CHR&CNOIS" "5 

DDD#=1INKEY# 

IF DDDf="" THEN 5880 

Ni=eASctDOoDE) 

IF Ni<47 THEN 4880 

IF MN1>55 THEN 48806 

PRINT CHRFCNIIJ" "; 

EEEF=INKEYF 

IF EEE$="" THEN 4#40 

E0=ASE tUPPER#IEEEF)) 

IF Ebe13 THEN 71970 

IF E0<65 THEN 5940 

IF EO}>71 THEN 5740 

FRINT CHRFIEOI," "7 

FFF$=INKEY# 

IF FFF$="" THEN 7010 

El=ASCiFFF$) 

IF Ei<49 THEN 7010 

IF E1>55 THEN 7010 

FRINT CHR&IEII:" " 

I, 25. 22% DE ne eurer 
"ZIEHEN UND ENTFERNEN WON STEINEN 
Mu u 2 a 22 2 an SE ee 
VeliWi-48, VO-54) 

N=IiNi1-48,NO-54) 

E=T(El-49,E0-54) 

A 2 2E a2 22 2 22 25 2 2 2 7 et 
IF Val THEN 7530 

IF N=e0 THEN 7530 

IF Eaü THEN 7830 

ME un zen in zus vi ala ya u Sa 3 Sn Sr Ay Sr a EEE a 

GOTO 7490 

I 2 u 1 1 22 2 5 2 ee 
"ZIEHEN ODER SETZEN UND ENTFERNEN 
EINES STEINES ++++444 444 
Mn 1 u 25 2 u 2 u 2 2 SE SE ee a a a en 
IF Gil,j)=0 THEN 7320 

"EIEHEN +rHrrHrrre 
WeliVi-48, VO-A4) 


I N=ItNi-48,NO-44) 


E=0 

I 2 2 2 u BE 2 25 E22 17 22 Sr ne a a een 
IF V=0 THEN 7430 

IF N=0 THEN 7430 
HH 
GOTO 7490 


"SETZEN UND ENTFERNEN EINES STEINS 
) YO 
| N=I(V1-48,V0-64) 


E=I (Ni1-48,N0-54) 

Mn un in u 2 25 2 D2n nun BE 5 za 2 1 2 1 a ee 
IF N=0 THEN 78530 

IF E=0 THEN 75309 

Ian 15 2 u 225 2% Sa SE SS BB 2 Sr SE Se Peer rear are ee ee er urn 
GOTO 7490 

BR uE 5 225 25 322 2SL E 2 22 2 22 221 a 2 Sy 57 Are ee ee ee Bee ae er ne rer Der 
"SETZEN EINES STEINES +HHrHHHsHrtrrtH 
I 22 a 2 EBENE 2 ee a a er re 
Ye 

N=14V1-48, ,WO-44) 


| E=Ö 


et 


' IF N=0 THEN 7830 


MM Di SEE Bun 3 an De 1 ee ee en a a ee rer 
'TEST,OB DER ZUG ERLAUBT IST +++++ 
+ 
P=1 

IF Gt1,P}<}WV THEN FAoo 

IF G12,P}<>N THEN 7800 

IF G{3,P)I<>E THEN 7300 

"DER ZUS IST ERLAUBT ,AUSFUEHREN ++ 


52 HoMEcoMRUTER 





PRINT" 


‘PRINT 


GOSUB" 3580 

GOTO 5650 

"ZUG NICHT ERLAUBT 7 +44++44444 ++ 

PeP+1 

IF Pi=6 THEN 7530 

"DER ZUG IST VERBOTEN +++#++++4+444+H 
NEUEN ZUG ABFRAGEN ++++++++++ +++ + 
PRINT 

GOTO 540 

"FELDÄUSGABE +HHH+H+H+HHH+H HH HH HH 
LOCATE 1,3 

AH BED EI: FB" 


PRINT 
le] 
PRINT" 1 "7 


1: PRINT; 


GOSUB 8360 

PRINT" 1" 

PRINT" t ' 5 
PRINTY 2 I "7 

GOSUB 8360 

PRINT-----"; 


FRINT#-37 17 1 #3 
GOSUB 83540 


} PRINT"--"j 


GOSUB 8350 

PRINT"--"; 

GOSUB 8360 

PRINT" 1 1 zu 

PRINT" el Bee, 
PRINT" 4 "; 


' BOSUB BI&0 


PRINT"--"; 
GOSUB 8350 
PRINT"--"}; 
GOSUB B340 
PRINT" “; 
GOSUB 8360 
PRINT"-="} 
GOSUB BI40 
PRINT"--"; 
GDSUB 83640 


, PRINT" 4“ 


PRINT" eat N 
PRINT" S° I 1 #5 
GOSUB 8360 
PRINT"-="; 

GOSUB 8360 
PRINT"--"; 

GOSUB 8360 
PRINT" I 5° 
PRINT" AN 
PRINT" & 1 "7 
GOSUB 8350 


PRINT"; 


GOSUB 83850 

FRINT"-—-——— ne 

GOSUB 8350 

PRINT" I &" 

FRINT" h | I" 
PRINT" 7 in H 

GOSUB 8350 

PRINT!" —————lı 

GOSUB 8340 

FRINT Tee 

GOSUB B3&20 

PRINT" 7“ 

FRIMT 

FRINT" A BC °D €: F GH" 
FRIMT 

RETURN 
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Fe 
| 
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vi 5 


are 


&, 


Pe 


- 


u“ 


ö FALUSGABE EINES STEINES +++4++++++4++ 


I=I+1 
ON FiI)+2 GOTO 8390,8410,8430 
PRINT CHR$(230)3 


' RETURN 


PRINT" "5 

RETURN 

PRINT CHR# (231135 

RETURN 

a ERBE BR TR von On IE 20 125 020 220 O2 CE 72 2En 22 2e 227 E20 .2 275 26 222 2Er uin zur da 2in n 
"DEFINITION DER NACHBARN +44++++++ 
rt 
DATA 2,2,10,0,0 

DATA 3,1,3,5,0 

DATA 2,2,15,0,0 


DATA 2,5,11,0,0 
DATA 4,2,4,5,8 


DATA 2,5,14,0,0 
DATA 2,8,12,0,0 
DATA 3,5,7,9,0 
DATA 2,8,13,0,0 
DATA 3,1,11,22,0 
DATA 4,4,10,12,19 


DATA 3,7,11,16,0 


DATA 3,9,14,18,0 


DATA 4,6,13,15,21 


DATA 3,3, 14,24,0 


DATA 3,15,18,20,0 

DATA 2,13,17,0,0 

DATA 2,11,20,0,0 

DATA 4,17,19,21,23 

DATA 2,14,20,0,0 

DATA 2,10,23,0,0 

DATA 3,20,22,24,0 

DATA 2,15,23,0,0 
et 
"DEFINITION DER MUEHLEN ++4+++4+4++4++ 
ae Ba Sr Sr 20 20 u 2 25 SS ESEL 2EL SEC 25% SEC 252 222 22 225 220 22. 25 au ai 2 ES Zn 


DATA 1,141219 


DATA 2,4,5,& 
DATA 3,7,8,9 
DATA 4,10,11,12 
DATA 5,13,14,15 


DATA 6,16,17,18 


DATA 7,19,20,21 


DATA 9,1,10,22 
ı DATA 0,2,5,8 


DATA 1, 
DATA 2,4,11,19 
DATA 3,6, 14,21 


DATA 4,7,12,16 


DATA 5,7,13,18 

DATA 6,17,20,23 
tee 
'EXTERN -> INTERN WANDLUNGSTABELLE 
ae Te er Per er Heer Me SE 2 5 er 1 SE BE Pu 22 225 22 2 25 0 2 un u u nn 

DATA 0,1,0,0,2,0,0,5 

DATA 0,0,4,0,59,0,58,0 

DATA 0,0,0,7,8,7,0,0 

DATA 0,10,11,12,0,13, 14,15 

DATA 0,0,0,15,17,18,0,0 

DATA 0,0,19,0,20,0,21,0 

DATA 0,22,0,0,23,0,0,24 
rt 
"BEWERTUNGSFELD : STEINE HHrHrHtrHt+ 
rt 

DATA 9.9,9.9,9.7 

DATA 8.0,6.5,5.0 

DATA 3.3,2.0,0,#7 

a Ser See Por Se 2 2 0 7 27 7 22 22 25 25 20 Du u u u Ze 
"BEWERTUNGSFELD : OFFENE MUEHLEN + 
tt 

DATA 3.30,3.10,2.90,2.70 

DATA 2.50,2.30,2.10,1.F0 

DATA 1.70,1.530,1.20,1.10 

DATA 0.90,0.70,0.43,0.20 
tr 
"BEWERTUNGSFELD: GESCHLOSSENE 
HUEHLEN er 
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1 tt 


29170 DATA 1.10,1.05,1-.00,0.75 

g1B0 DATA 0.70,0.85,0.80,0.75 

91970 DATA 0.70,0.65,0.50,0.55 

9200 DATA 0.50,0.45,0.40,0.18 

9210 FOR i=1 TO 2: PRINT:NEXT: PRINT" 
Spielanleitung" :PRINT:PRINT 

9220 FRINT"An diesen Spiel sind zwe 

i- Spieler beteiligt (Computer und Bu 

I. Jeder Spieler hat 7 Steine die 
zu Beginn des Spieles abwechselnd au 

f den Eck-" 

7230 ON 80:1) GOSUB 7810 . 

7240 PRINT"punkten des Spielfeldes geset 

zt werden." 

7230 PRINT 

9250 ON SUt1) GOSUB 7810 

9270 FRINT" (Stein auf 

ingabe B4 [ENTER] )." 

9280 PRINT 

#290 PRINT"Jeder Spieler ist bestrebt 
sich eine Muehle zu bauen „ Das sind d 

rei Steine die jeweils durch die L 

inien des" 

9300 ON Sati} GOSUB FB10 

9310 PRINT"Spielfeldes miteinander verb 

unden sein muessen. 

7320 PRINT: PRINT 

9330 PRINT" Weiter ? LEERTASTE druscken 


9340 ws=INKEYF 

9350 ON Sati1) GOSUB #810 

93540 IF w#<£>" "THEN 9340 

2370 PRINT 

7380 PRINT 

9730 FRINT"Sind alle Steine gesetzt ‚s 
o wird mit dem Ziehen der Steine beg 
onnen. Die Steine duerfen nur entlang d 
er Linien und nur um einen Schritt gezo 
gen werden. 


u 

29400 PRINT"tiBEtein von D2 auf B2 ziehen 
= Eingabe D2B2 [ENTER])" 

P410 PRINT 

7420 PRINT"Hird ein Muehle geschlöosse 

n d.h. es liegen drei Steine auf einer 

Linie „ so nird dem Gegner ein Stein abg 

enommen.«" 

9430 PRINT 

9440 ON 5011} GOSUB 7810 

9450 PRINT"(Stein von B4 auf B2 ziehen u 

nd Stein Gil entfernen = Eingabe B4B261 
ya 

9440 PRINT 

9470 PRINT"Das gleiche gilt auch beim 5e 
tzten der Steine." 

9480 ON Satı) GOSUB 7810 

3490 PRINT 

9500 PRINT"(Stein auf EI setzten, Ste 

in A7 ent- fernen = Eingabe E3A7 [ENTER] 
i Ein 

9510 PRINTIıPRINTEPRINT" 

STE druecken...." 

7520 wFeINKEY$ 

27550 ON Sgdtıl) GOSUB 7FBlO 
9540 IF n#<>" "THEN 9320 
9550 PRINT 

9550 FRINT"Hat ein Spieler nur noch drei 
Steine,so darf er mit diesen springe 

n. D.h. er braucht sich nicht mehr an 

die Linien des Spielfeldes zu halten,so 

ndern darf seinen Stein an eine belieb 
ige Stelle" 

7570 ON 5011 GOSUB FB10 

gsa0 FRINT"des Feldes setzten,sofern d 
iese nicht von einen anderen Stein beleg 

tt ist." 

9550 ON EDti) BOSUB 7810 

aacd FRINT"Hat ein Spieler weniger 
als drei Steine „ so «verliert er „d 
a mit zwei Steinen keine Huehle mehr geb 
ildet werden kann." 


B4 setzten = E 
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Homscomputer 53 





g9&10 FRINT"Steine in geschlossenen Muehl 
en duerfen nicht entfernt werden." 

95420 DON SG8t1l) GOSUB 7810 

95350 PRINT:FRINT"Du hast die weissen 5te 
ine,der Computer die schwarzen." 

gadb FRINT 


9850 PRINT:PRINTEFRINT" Alles 
klar'!? Viel Spass 

beim Muehlespiel!!" 

ah PRINT 


7470 PRINT" 
vecken...." 
9480 wF=eINKEY$ 

7670 DON Sat) GOSUB 7510 

a7oo IF wEi>" " THEN F480 

710 FOR Iesl TO 32:ıPRINTIıNEXTIPRINT" ICH 
RECHNE...." 

720 DN SG1t1) GOSUB TB1O 

9730 GOTO 3609 

9740 END 

07750 RESTORE 7850 

9750 IF INKEYECH"" THEN RETURN 

#770 ON SQ@ti) GOSUB 7810 

9780 GOTO 7740 

2790 REM melodie 

9800 RESTORE F840 

g81o READ toan,dauer: IF dauer=0 THEN 7800 
9820 SOUND 1,ton,dauer,& 

#830 SOUND 2,ton#+2,dauer ,S 

7840 SOUND 4,ton+4, dauer „4 

9850 RETURN 


Spielbeginn 7? LEERTASTE dr 


„142,25,127,25,113,25,106,25,75,25,87,25 
‚95,37,106,12,0,1,106,150,0,50,106,25,0, 
1,106,25,119,25,134,25,142,25,159,25 
7870 DATA 134,25,142,25,0,1,142,100,157, 
50,179,50,142,25,159,25,0,1,159,50,213,5 
0,179, 50,142,25,0,1,142,25,0,1,142,100 
gB80 DATA 159,25,177,25,0,1,179,150,0,50 
„142,25,127, 25.113,25, 106,25 ,95 25.89.25 
'95,37,106,12,0,1,106,150,0,50,108,25,0, 
1,104,25,119,25,134,25,142,25,159,25 
50,179,50,142,25,159,25,0,1,159,50,213,5 
0,179,50,142,25,0,1,142,25,0,1,142,100 
7900 DATA 159,25,179,25,0,1,179,150,0,50 
‚142,25,127,25,113,25,106,25,95,25,89,25 
‚95.37,106,12,0,1,106,150,0,50,106,25,0, 
1,104,25,119,25,134,25,142,25,159,25 
9710 DATA 134,25,142,25,0,1,142,100,15%7, 
50,179,50,142,25,159,25,0,1,157,50,213,5 
1) | 
9920 DATA 179,50,142,25,0,1,142,25,0,1,1 
42,50, 159,25,179,50,142,50,159,50, 213,50 
| 179,50, 142 245,0, is 142,25 ‚O1 1] i42, 100 
9930 DATA 0,1,142,100,0,1,142,100, 108,50 
‚95,50,89,50,95,25,106,25 

3940 DATA 95,75,104,25,119,50,106,25,142 
‚25,0,1,142,200,0,1,142,100,0,1, 142,100, 
108, so, 95, 50,89,50,95,25,106,25, 95,75,10 
6,25,119, 50,95,50, 39, =0,119,50,134,50,14 


9950 DATA 0,0 


ni =t-1e DATE 157,25,179,25,0,1,179,150,0,50 





' ZEILENNR.: 


SUMMEN 

i0- 20: 25555 770- 800: 2848 

30- 40: 13657 Bliö- 820: 34702 

E0- 60: 30045 B30- 840: 72&0 

70- 80: 41584 B850- 850: 30484 

90- 100: 14083 | B70- 8850: 54024 
110- 120: 31254 | 6870- 700: 7948 
1350- 140ı 23798 2io- 920: 30745 
150- 1&0: 200953 950- 9740: 55937 
170- 180ı 254535 ul Bbldı 4955 
170- 200r 1320 g70- 980: 31757 
210- 220: 1134 990- 10001 5047 
230- 240: 14393 1010=- 1020: 30315 
230=- 2403 497 1030- 1640: 33570 
270- 280: 11707 1050- 1050: 156527 
290- 300: 8479 1070- 1080: 83223 
310- 2320: 57285 1090- 1100: 485 
330- 340: BiiB 1110- 1120: 20559 
350- 350: 400970 1130- 1140: 34778 
370- 380: 310568 | 1150- 1180: 11473 
370- 400: 58427 | 1170- 1180: 13540 
41l0=- 420: 54110 1190- 1200: 14437 
430- 440: 46B08 1210- 1220: 33976 
350- 450: 74804 1250- 1240: 35751 
470- 480: 11348 1250- 12501 51877 
40- 500: 31250 1270-. 1280: 51727 
s10- 520: 45854 1270- 1300: 32403 
530- 3540: 519753 1310- 1320:ı 37053 
550- 5älı 4195 1339=- 13401 &19705 
570- 580: 4212 1350- 136501 51937 
570- 8500: 4208 1370- 1380: 32407 
510- 520: 35062 13970- 1400: 27751 
5430- 540: ‚s20 1410- 1420: 52808 
s50- &40ı 29093 1450- 14401 33241 
570=- 5850: 35082 1450- 1440: 32700 
570- 79dı 19407 1476- 1480: 45172 
’ioö- 720ı 101i8 1490- 1500: 158309 
730- 740: 30313 1510- 1520: 45672 
750- 7älı 7510 1530- 1540: 47553 
770- 780: 14451 1550- 1560: 4212 
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1570- 1580: 35507 2a 25 10547 
1390- 1500: 15570 2370- 2360: 108532 
1810- 1520: 7239 2390- 74001 70532 
1830- 1640: 10574 2410- 2420: 40555 
1550- 1550: 20384 2430- 2440: 14100 
15790- 1580: 42240 2450- 27440: 70741 
1a90- 1700: 33245 2470- 2480: 37483 
1710- 1720: 11830 24906- 2500: 58811 
1730- 17439ı 18574 2510- 2520: 345531 
1750- 1780: 8977 2S30- 2540: 17495 
1770- 1780: 22105 2550-2550: 79515 
1770- 1500: 22051 2570- 2580: 11018 
1810- 18209ı 150097 2san- Zalde F7BO 
1830- 1840: 78787 ?&10- 72520: 17495 
1850- 1850: 44157 FPasl- 7540: 18428 
1870- 1880: 23050 2450- 26 2848 
1890- 1900ı 37110 2470- 2680: 29542 
{910- 1920: 21512 PE9O- 2700: 27547 
1950- 1940ı 507978 2710- 2720: 41542 
1950- 1950: 55451 2730- 2740: 27731 
1770- 19780: 15241 2750- 2760: 41493 
19970- 2000: 18397 2770- 2780: 18305 
z2010- 2020: 18725 27970- 2800: 42138 
2030- 27040: 5758 2810- 2920: 18567 
2050- 2050: 189397 28350- 2840: 37855 
2070- 7080: B728 2850- 2840: Z1&85 
2070- 2100: 29542 2870- 2880: 13072 
2110- 2120: 30997 ?a90- 2900: 39567 
2130- 2140: 17670 2910- 2920: 13097 
2150- Z180: 21052 2930- 2940: 142997 
2170- 2180: 28924 95-79 28177 
2170- 2200: 38805 2970- 2990: 20358 
2210- 22201 &0501 2990- 7000: 30327 
22.350- 2240: 373354 3010- 3020: 209245 
2750- ?7s0ı 17495 3030- 3040: 30292 
2270- 2280: 30427 3050- 3050: 78767 
22#70- 23001 2377 3070- 3080: 30124 
2310- 2320: 17495 S0I0- 3100: 32138 
2330- 2340: 19540 3110- 3120: 10333 
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— —— en 
| 


3140: 


310: 


180: 
3200: 
3270: 
3240: 
326508 
3280: 


I 33007 


3320: 


3340: 
- 3360: 


3380; 
54 
747201 
5440 
54 
3480: 


Bi /eleh 


3a20: 
3540: 
sat 
3300: 
3500: 


I- 36520: 


3640: 
36450: 
SsbB0: 
37007 
37201 
>740: 
37608 
3780: 
800: 
atzilel 
3840: 


sBadt 


=BBür 
3900: 
59201 
3940: 
350: 
37801 
0007 
lea] 


040: 4 


4060: 
4080: 


4100: 33 


4120: 
4140: 
4160: 
4180: 
4200: 
42201 
42403 
4260: 
4280: 


45007 . 


4320: 
4340: 


Ve 4a 


4380: 


400% 
4420: 
4440; 
440: 
44Bd: 


4500: 2 


45201 | 
4540: 


4säacr 
4580: 
45,00: 
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- 46201 


4640: 
:T-T-185- 
1.121087 
4700: 


- 4720: 


4740: 
470: 
4780: 
4800: 
4820: 
4340: 
E1=7-T0 7 
4880: 
4700: 
4r2o: 
4940: 
490: 


ze \-/-ie?: 


sooo: 
50708r 
Sch4öe 
Soc 
SOsce 
Ss100: 
=120: 
5140: 
s180: 
s1B0: 
5200: 
Set 
5240: 


32608 


5280: 
3300: 
53208 
535403 
536 
5380: 
S4do0: 
54270: 
440: 
mt. 7=1# 5) 
5480: 
550g: 
te Pe 
Ss40: 
S3sadtr 


35801 


Saldo: 
ss20: 
=i-nlsh 


1-18 


m1-1=1# 5 
37008 
7208 
5740: 
Sralı 
S7adı 
sao0: 
58270: 
Ss840: 
B&0:r 
Sad: 
role 
Srz20: 
Ele 
ber ee 
5rBd: 
sooo: 
-jarler 
=182. 1675 
ol 
=10127# 


54100 
80184 
13547 
45192 
25413 
30131 
27547 
50249 
28017 
18594 
60979 
28017 
18457 
5264 
33993 
49366 
»3872 
29436 
28100 
34437 
28205 
35471 
15901 
13098 
8475 
2067 
46477 
38493 
27795 
29033 
30921 
34003 
27347 
62568 
27667 
47887 
30921 
28100 
AT 5 
42633 
35471 
Fi = bet Fi 
12909 
20314 
2095 
52031 
-B713 
45679 
15945 
44391 
g747 
27547 
57329 
28484 
37334 
5733 
40206 
a 
9521 
29476 
35021 
a 
36346 
8256 
28489 
13973 
31811 

2848 
36557 
28638 
29137 
66287 
Be BE 

1812 





s0F0- 
5i110- 
&130- 
6150- 
41 70- 
BI FO- 
BELl- 
5230- 
azul- 
5270- 
B290- 
ui del 
65330- 
6350- 

>70 
u>70- 
4410- 
5430- 
5450- 
44 70- 
5490- 
&510- 
u330- 
5550- 
[ee 
5370- 
Bbld- 
5530- 
-i-1el#ie 
s470- 
sh70- 
6710- 
lin 
5730- 
6770- 
770- 
5Bl0- 
5850- 
5850- 
EB70- 
BB70- 
srl1d- 
5730- 
s750- 
uF70- 
u7970- 
ol0- 
7030- 
050- 
‚oro- 
7990- 
110- 
+130- 
7150- 
7170- 
1970- 
T210- 
7230- 
7250- 
7270- 
7290- 
7310- 
7330- 
7350- 
7370- 
7370- 
7410- 
74230- 
7450- 
7470- 
7490=- 
7210- 
7330- 
7550- 


lo: 
s17c: 
6140: 
6160: 
6180: 
sroo: 
6220: 


sro: 


6250: 
52B0: 
-mirlar 
[eye E 
5340: 
s3Al: 
6380: 
od: 
420: 
6440: 
67-105 
5480: 
6500; 
6520: 
6940: 
65350: 
sodü: 
[-T-1ela} 
hd 
5htle 
[=1-1=1@ 51 
== 1= [#7 
57008 
4720: 
6740: 
5750: 
6780: 
[== [ala 
689201 
sB40: 
=1= 1-18 
Bd: 
u lslehi 
rd 
Pac: 
race 
srad: 
o001 
0201 
7040: 
‚080: 
’oB0: 
109: 
120: 
7140: 
160: 
189: 
7200: 
2201 
7240: 
240: 
7280: 
300: 
73203 
7340: 
3603 
7380: 
74003 
74203 
7440: 
460: 
7480: 
"soo: 
7520: 
7540: 
350: 


29241 
27731 
84518 
5548 
44925 
42533 
64599 
27731 
35471 
15047 
753 
aur314 
2598 
22219 
14342 
15745 
45824 
62358 
32034 
40144 
382 
27547 
57a 
ZB5RB4 
96297 
4242 
10195 
35333 
64137 
51710 
15977 
Fin PET 
15788 
16973 
19971 
14545 
179767 
26974 
21374 
128970 
23277 
23168 
12995 
25475 
16872 
15459 
17198 
199745 
15365 
67481 
37857 
59997 
36409 
17975 
28005 
35113 
40490 
58497 
32263 
36409 
Ant. PB 
45317 
32627 
57493 
17976 
28005 
60253 
29494 
te) 
36361 
62713 
29476 
48008 
41a 





7570- 
7390- 
7610- 
7630- 
7550- 
Tarü- 
7890- 
’’10- 
7730- 
730- 
7770- 
7790- 
7810- 
T930- 
7850- 
7870- 
7870- 
7710- 
7930- 
7950- 
F70- 
7990- 
8010- 
8030- 
EeIa0- 
8070- 
B070- 
8i10- 
B130- 
B150- 
B170- 
B170- 
8210- 
8230- 
8250- 
B770- 
8290- 
8310- 
8330- 
B350- 
8370- 
8370- 
B410- 
B430- 
g450- 
3470- 
B490- 
3510- 
8530- 
Bs5so- 

B570- 
8590- 
BAalo- 
9630- 
B650- 
3670- 
BAF0- 
9710- 
3730- 
g750- 
ar’ro- 
Br’FO- 
BB10- 
8830- 
B350- 
BaI7ü- 
8870- 
BF10- 
3930- 
BF30- 
B970- 
BFFO- 
FOLO- 
9030- 


58901 
ao: 
T&a20: 
7640: 
Tahoı 
T&Rd: 
700: 
7720: 
77401 
r&a0: 
7780: 
7800: 
820: 
7840: 
‚850: 
7880: 
77007 
7920: 
77401 
79403 
F7801 
BO90: 
8020: 
8040: 
2050: 
8080: 
B100: 
8120: 
8140: 
Biäd: 
BiB0: 
200: 
8220: 
8240: 
8240: 
82806: 
83500: 
8320: 
8340: 
B350: 
8380: 
8400: 
8420: 
9440: 
24401 
84901 
B500: 
8520: 
95401 
8540: 
8580: 
Baodı 
9420: 
8440: 
B550: 
B480: 
art 
B720: 
8740: 
Brad: 
B7adQ: 
gaoöüe 
8820: 
SBau: 
BBA0: 
8880: 
Brodı 
89270: 


8740: 34 


BF&0: 


BFBO: ( 


o00: 
90204 
20403 


. ni i 





FOI0- 9040: 32030 9270- 9280: 25243 9510- 9520: 64371 7750- 7760: 8177 
7050- &0:ı 8825 9290- 9300: 39101 9530- 9540: 10942 9770- 9780: 3222 
9070- 7080: 45807 9310- 9320: 54776 7550- 97560: 5486 a end Eh 
7070- 9100: I8589 9330- 9340: 52961 9570- 9580: 6957 Falo- 9820: 72775 
9110- 9120: 22204 9350- 9340: 11991 9590- 9600: 50172 FB30- 7840: 45217 
F130- 9140: 38457 9370- 9380: 382 F610- 9620: 68014 97850- 7860: 15551 
9150- 9160: 86240 9390- 9400: 52813 9630- 96401 27903 7870- 7880: A711 
9170- 9180: 22610 7410- 9420: 13214 9650- 9660: 3724 7870- 9900: 49711 
9190- 92001 22507 9430- 9440ı 2973 9670- 9680: 4959 7710- 77201 30317 
9210- 9220: 23278 7450- 94540: 57050 9590- 9700: 136492 79730- 7740: 27165 
9230- 9240: 19520 9470- 9480: 42377 9710- 9720: 43553 | 
7250- 9260: 2973 7490- 9500: 50708 9730- 9740: 903 Er NEE RETTET EEE 


GESAMTCHECKSUMME:55735 | 








— Die neue Dimens 


ion - 68000 — 





Die neue Computergeneration hat trotz aller Unterschiede doch eines gemeinsam: Die CPU 68000 von Motorola. Diese 16/ 
32-bit CPU eröffnet neue Perspektiven. Die Computer werden schneller, bieten eine bessere Auflösung, mehr Speicher und 
verfügen über eine benutzerfreundliche Betriebssystem-Oberfläche. Für den privaten Anwender sind die Geräte AMIGA, 
ATARI ST, APPLE MACINTOSH und SINCLAIR OL interessant. Diese recht unterschiedlichen Rechner sollen nun im 


einzelnen beschrieben werden. 


AMIGA 


Das jüngste Kind der68000er-Generation 
heißt AMIGA und kommt von Commo- 
dore. Lim gleich vorweg zu nehmen - die- 
se5 Gerät bietet all das, wovon C-b4-Be- 
sitzer bisher nur träumen konnten. Die 
Graphik ist revolulionär: 640 mal 400 
Punkte Auflösung mit lö. aus 4096 Far- 
ben! Außerdem bietet der AMIGA Ste- 
reosound und als einziger der 680008er- 
Computer sogar & Sprites, Hier wird die 
Zielsetzung deutlich: Spiele mit vielen 
Farben, Sound und Sprites werden auf 
dem AMIGA in Perfektion möglich. Die- 
se Eigenschaften prädestinieren den 
AMIGA allerdings nicht gerade für den 
professionellen Einsatz. Die Speicherka- 
nazılal beträgt in der Grundversion nur 
256 KB, läßt sich aber: auf 512 KB erwei- 
tern. Die Benutzeroberlläche des AMI- 
GA heißt Intuition und ıst im Gegensatz 
zu GEM oder MS WINDOWS nicht stan- 
dardisiert, es gibt also keine Software von 
anderen Geräten her. Diese Oberfläche 
arbeitet nach dem recht bekannten Prin- 
zip mit Maus, Windows und Piktogram- 
men. 


Aları ist seH Jack Tramiels Wechsel von 
Commodore zu dieser Firma auf Erfolgs- 
kurs. Der ATARI520ST wurde Personal- 
computer des Jahres, mitdem Nachfolger 
ATARIL 320 ST=+ führt Atari seit Monaten 
die Bestsellerlisten in der Kategorie „Per- 
sonal Computer“ an, und die Modelle 260 
und.l040 ST finden ebenfalls großen An- 
klang. Die Leistungsmerkmale sind be- 
kannt: 640 mal 400 Punkte-Auflösung 
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menochrom, Sl2 Farben, alle Schnittstel- 
len einschließlich MIDI, 1024 KB RAM- 
Speicher Die Benutzeroberfläche des 
ATARILST istidas bekannte GEM von Di- 
gilal Research, dem Erfinder von CP/M. 
Wahrscheinlich ist der ST auferund 


zweier Faktoren so erfolgreich: Zum ei- 


nen der günstige Preis (260: 998,- DM: 
320+:2698,- DM), zum anderen das Ver- 
trauen in Jack Tramiel, der vielerlei Er- 
weiterungen ankündiet: Graphik-Erwei- 
terung (10 mal schneller, bessere Auflö- 
sung als Amiga), CD-ROM-Laufwerk, 
UNIX, etc. 


MACINTOSH 


Der MACINTOSH von der ehrwürdigen 
Firma APPLE ist ein sehrexklusives Ge- 
rät, welches sich nicht zuletzt aufgrund 
seines Preises weniger für den Durch- 
schnittsverdiener eienet. Der MACIN- 
TOSH bietet einen integrierten 5/W-Mo- 
nıtor (512 mal342 Punkte Auflösung)und 
läßt sich auf.bis zu4 MB RAM erweitern. 
Wie auch der AMIGA und der ATARI 
verwendet der MACINTOSH die moder- 
nen 3,5 Zoll-Disketten. Wer einen leicht 
zu hedienenden Computer mit dem Flair 
des außergewöhnlichen sucht, für den 
komminur ein APPLE MACINTOSH in 
Frage. 

Außer den bereits vorgestellten Geräten 
gibt es noch einen weiteren bekannten 
Vertreter der 68000er-Generalion: den 
SINCLAIR QL. Er arbeitet allerdings mit 
dem „kleinen“ 68008-Prozessor und .bie- 
tet in der Grundversion nurl23 KBRAM. 
Dergrobe Vorteildes QL ist die mitgelie- 
ferte Software (Abacus, Archive, Easel, 
Quill), der große Nachteil; die Microdri- 
ves als Massenspreicher, Die Zukunft des 


ÖL ist momentan noch.nicht gesichert. 
Amstrad hat Sinclair gekauft, Schneider 
wird den Vertrieb ın Deutschland über- 
nehmen. Wasjedoch ausdemÜOL wird; ist 
noch ungewil. 


Dr 

Fazit: 
Wer modemste Computertechnologie er- 
werben möchte, dem ist zum Kauf'eines 
68000er-Gerätes zu raten. Für den Nor- 
malverbraucher wird sich meist die Frage 
„Amigaoder Atarı ST" stellen..-Diese Fra- 
ge kann nicht allgemein beantwortet wer- 
den, man muß differenzieren, welche 
Zielgruppe angesprochen wird, Der AMI- 
GA erscheint in vielerlei Hinsicht ein 
Nachfolger des Atari $00XL. der ATARI 
STein Nachfolger des C-64 zu sein! Denn 
wie auch damals, als es um den ‚„Weti- 
streit® S00XL oder C-64 ging, wird auch 
diesmal wiederdas Modellsiegen, das die 
meisten Käufer findet. Der AMIGA ist 
ein Graphikkünstler (wie früher 800XL], 
dochder ATARIST scheint der Bestseller 
zu werden (wie es Tramiel beim C-64 
schon einmal schaffte). Letztendlich wer- 
den die Preise und die Software entschei- 
den, Der AMIGA wird vorübergehend 
für3 999,- DM verkauft, denn nurbeient- 
sprechenden Stückzahlen wirdesSoftwa- 
re geben. Der ATARIT ST hat sich bereits 
fest etabliert und bietet mit dem kosten- 
losen CP/M-Emulator und dem ange- 
kündieten MS-DOS-Emulatorbereitsein 
reiches Soltwareangebot. Der 260 5T 
wird für Einsteiger, der5205T+ für Profis 
interessant sein. Doch wer letztendlich 
zum Marktführer wird, das entscheiden 
die Käufer! 


Patrick Schmitz 
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oder 48K Sinclair ZA Spectrum 











ee, Ein Action-Spiel für den IK MW 


Ihr Land vor dem Untergang zu bewahren! 


Über dem heiligen Meer-ist ein riesiges 
Laser-Labyrinth aufgebaut worden, um 
sich feindlicher Angriffe zu. erwehren. 
Falls sich jedoch dennoch ein Schuß sei- 
nen Weg durch dieses Labyrinth bahnt, 
müssen Sie versuchen, diesen abzufan- | 
gen. Jeder Schuß, der den Laserschutz- 
schirm durchdringt und nicht von Ihnen 
aufgehalten werden kann, schlägt ein 
kleines Loch in.die Abdeckung des heili- 
sen Meeres. Falls Sie jedoch einen Schuß 
erfolgreich stoppen konnten, so verwan- 
delt sich dessen Energie in Baumaterial, 
welches Sie verwenden können, um die 
Löcher in der Abdeckung wieder zu stop- 
fen. Das Spiel ist zu Ende, wenn ein 
Schuß des Hubschraubers das Labyrinth 
und die Abdeckung des Meeres durch- 
schlagen hat. 


Tastenfunktionen: 
Q- nimmt eine Bodenplatte auf 
7. - setzt eine Bodenplatte ab 


I - links 
P- rechts 


Eine Taste von B bis SPACE beschleunigt 

die Bewegung Ihres Basısgeführts. 

1 - stoppt das Programm 

? - hebt die Unterbrechung durch (l) 
wieder auf 

3 - beendet das Spiel vorzeitig 


Teil 1 
LASER MAZE 
ZUHEIR URWANI 


CLEAR 27977 





WESTERHOLTER WEB 133 
4350 RECKLINGHAUSEN 


Fremde Mächte greifen das heilige Meer an, um es zu zerstören. Ihre Aufgabe ist es nun, 


Einige Hinweise zum Programm: 


Geben Sie bitte zuerst das kurze.Haupt- 
| programm:ein (REM-Zeilen können na- 
| türlich weggelassen werden). Dann spei- 


chern Sie dieses mit SAVE*LASER MA- | 


ZE"LINE lab, 

Geben Sie:dann das zweite Basic-Pro- 
gramm'ein und starten es. Geben Sie nun 
die einzelnen Zahlen ein und überprüfen 
Sie nach jedem Block die Richtigkeit der 
| Prüfsumme. Bei richtiger Prüfsumme 
können Sie nun die Daten für den näch- 
sten Block eingeben. Ergab sich ein fal- 
scher Wert, geben Sie statt einer Zahl nun 


den Buchstaben (Nlein. Eserscheint das 


Wort „KORREKTUR“ und Sie können 


„so Ihr 
seid also 
der Spiel- 
aufgabe 
bei 
LASER- 
| MAZE fl, 
Ich een 
gewach- en 
sen £e- Des: 
wesen!“ 





dann den letzten Block noch einmal ein- 





geben. Wenn Sie mitdergesamten Einga- 
be fertie sind, wird sich das Programm 
selbst abspeichern. Sie können dies aber 
auch selbst tun mit: 


SAVE*LASERCODE"CODE 300002118: 
Nun löschen Sie den ganzen Speicher mit 
RANDOMIZE USR 0 und spulen die 
Kassette zurück, Laden Sie dann das ge- 
samte Programm mit LOAD"LASER 
MAZE* oder nur mit LOAD" ein. Das 
Programm startet automatisch und kann 
nur mit dem Ausschalter beendet wer- 
| den, 


80 PRINT jj" : "3 
70 FOR n=j TO j+5 


80 INPUT In; 


90 IF e=n THEN BEEP .5,30: PRI 


NT ""TAB 125 "KORREKTUR"'': 
NEXT i 
100 FRINT e;"” 


=i-120: 


5 e}}5 
110 


LET 1 


"( TO 4-LEN STR 


LET s=s+te: POKE n,e 


20 LOAD ""CODE 30000, 2118 
RANDOMIZE USR 30000 


SAVE "Laser Maze" LINE 19 
SAVE "LCode"COoDE 30000,2118 
Teil 2 
CLEAR 29799: LET a=30000 
FOR i=a TO a+r2i1? STEP &0 


LET s=0 
FOR j=i TOD i+5? STEP 6 
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120 
130 
140 
150 


30000 
30005 


30012 : 


30018 
30024 


NEXT n: PRINT 

NEXT j: PRINT ’"Summe *";5'' 
NEXT i: PRINT "Abspeichern” 
SAVE "LCode"CODE 30000, 2118 


Teil 3 

195 36 119 0 
049° 5.05.50 
ee Le 
250 0 0 
ie) 


0 255 255 





HomscompuTeR 5F 


30030 ; 
3003& : 
30042 | 


30043 
30054 


Summe 


30050 


300565 
30072 : 
Ss0078 | 
30084 : 
30090 : 


30095 


30102 | 
30108 : 
30lil4 : 


Summe 


30120 : 
30128 : 


30132 
30138 
30144 


30150 : 
30156 | 
30182 : 


30158 
30174 


Summe 


30180 : 
s30lss : 


301972 


30198 : 


30204 
30210 


30218: 


30222 


30228 : 
30234 : 


Summe 


30240 
30245 


30252 : 
30258 : 


30254 


30270 : 


30276 


30282 | 
30288 :; 
30294 : 


Summe 


: 30300 


u“... “u 
u 


6362 


ER 


63 


30306 : 240 0 
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303172 


30324 


30330 : 


30336 
30342 


30348 
30354 : 


Summe ; 


303650 
30354 


30372 : 
30378 & 


30384 


30390 : 


30396 


30402 : 


>0408 
30414 


Summe 


30420 : 
304264 : 


30432 


30438 | 
30944 : 
30450 : 
304565 : 
30982 : 


30458 
30474 


Summe 


30480 : 


30484 


30492 : 
30498 : 
30504 : 
30510 : 


30516 


30522 : 


30528 
30534 


Summe 


30540 : 
30546 : 


30552 


30558 : 
30554 : 
30570 :! 
20576 : 


30582 


30588 : 
30594 : 


Summe 
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20500::1 5 1 237.176 33 | s0Bsa : & 126 35 19848 215 
30604 :0 12754 8 35 35 
20612 : 58 177 92 1983 119 Sunme &331 
304418: 35 54 5 53 35 35 
2 52 535 1 0900 : i6 299 #62 32 2156 
20530 : 251 62 2 2051 .22 209706 : & 126 35 1se de 215 
30636 : 17 13F 1181 44 O0 30912 : i6 247 58 4 127 
3064? : 205 &0 32 33 351 116 s0918 : 244 22 i 17550 
206448 : 34 54 92 62 7ı 50 30924 : 4 127 254 0 32 101 
30654 : 143 92 14 0 205 103 30930 : 14 1 205 25 121 237 
20936 : 75 230 31 87 237 95 
Summe 4028 30942 : 95 26: 230 31 79 19 
| 30848 : 26 2907 1810 AA 
30660 : 120 62 67 21514 4 70954 : 20564 i2z1 23543 22 
206656 : 205 i03 120 i4 20 205 
20672 : 103 120 14 21 205 103 Summe 5777 
230478 : 1206 19 62 22 215 SR 
20684 : 120 215 &2 31 215 &2 20940 : 70 #82 ?72 215 120 215 
20590 : 67 215842 67 215 16 | 20955 i 121 215 62 3 so 143 
20596 : 240 6 23 62 22 215 30977 =: 92 19 24 2301 178 
30702 : 62 2 215% 2 >15 30978 : 61 215 24 49 1977 104 
20708 : 62 7 50 14392 &2 som: 0 A Hl Aal Aal 
80714 : 34 215 16 251 62 2 SF ET iD 
. 20996 : BB 9 126 193 201 38 
Summe 5673 31002 : 126 175 145 111 52 62 
| si008 : 10 190232 6 540 
=0720 : 215 &2 21 21582 2 z1014 =: 43 12 z43 244 121 254 
20726 : 215 62 13 50 143 92 
722 :ı6 7 &2 2 21582 Summe 5087 
30738 : 68 215 &2 69 215 &2 | | 
20750 : 205 1 > #52 43 0 | 310724 : 254 28 200-5352. 201 58 
30762 .: 21562 2 2156 7 31038 : 171 33 0 127 17550 
30768 : 62 71 215 62 72 215 31044 : 143 92 70 120 254 i 
20774 : 42 73 215 62 74. 215 31050 : 32 20 62 22 215 62 
31056 : 8 215 120 215 &2 32 
Summe 5800 | 31062 » 215 42 32 21554 29 
31068: 35 330 3 2 
30780 : 16 242 62 71 50 143 31074 : 21562 8 215 120 0 
30784 : 92 62 67 21542 6 
30792 : zı5s ig 1 205 103 120 Summe 5801 
30798 ı 62 22 215 175 215 175 
20804 : 215 62 #7 215682 67 21080 : 60 60 215 &2 32 215 
20810 : 215 #72 2 205 i 272 31084 : 53 35 35 126 254 15 
30816 : &2 3 50 14392 24 21092:56 4.65 .1 24 10 
30872 : 15 &2 22 215 121 215 31098: 2348 5 4 6 3 
30823: 75 254 262 % s1104: 24 2 & 7 2379 
30834 : 215 16 251 201 237 95 31110 : 160 254 1 32 61 126 
|: allis : 43 190 40 564 235 33 
eumme 5467? | 31122 : 34 1271 5: 126 
BB: 2540 20 8 9 124 
| 30840 : 230 31 103 237 95 ill 31134 : 254 128 do 38 24 2493 
s0844 : 19 il &2 = 215 121 | 
| soes52 : 21562 ı 2156 30 Summe 4552 
20858 : 124 230 1 198 41 215 | | 
| 20864 : 35 16 247 i2 121 254 31140: 54 1 35 534 4 = 
| a0970 : 16 22 281 z05 98 125 | 31196 :54 9 35 26 0 18 
| 30876 : 33 244 126 62 69 50 31152: 27 26 60 119 35 5% 
| 309882 : 143 92 62 22 215 62 1139 20 62 7 30,199 32 
| 0838 - 4 715 5? 17? ?15 ö 31 154 > 7 »? 715 52 I) 715 
j 21170 : 43 126 215 62 47 215 
| 
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31176 : 62 143 92 62 31452 : &2 42 | 215 
Ss1l82 : 22 21562 8 21558 31458 : &2 22 2ZI5 642 19 215 
31188: 0 127 21562 58 2is 31464 : 124 215 62 44 215 62 
31194 : &2 59 215 62 #0 215 31470 : 45 215 42 46 215 &2 
=147& : 247 219 254 87 230 31 
Summe 45% 319482 : 254 21 200 230 1 32 
s1423 : 8 &2 247 ?19 254 230 
31200 : SB 176 92 2540 % 31494 : 2 32 7248 122 230 6 
312066 :5 21931 95 24 5 
siz1?2 : 30 0 62 223 219 254 Summe 72306 
sızi8 : 87 230 | 32 4 203 
s1224 : 195 24 7 122 230 4 231500 : 202 248 124 14 20 6 | 
31230 : 22 2 203 203 42 254 31506 : 0 16 254 13 32 249 
31234 : 219 254 2302 32 34 31512: 3 1220 22 2 » 
31242 : 203 211 24 10 62 251 sisis : 8 229 124 203 63 4 
31248 : 219 254 2901 32 31524 : 27 35 203 30 16 251. 
31254 : 203 219 62 127 219 254 31530 : 225 203 320 34 29 22 
31536 : 23833 1490 21 32 
Summe 7057 31542 : 230 33 34 1727 124 254 
sisas: ı 32 3 24 ı3 225 
31260 : 238 255 230 31 40 2 sıss4:ı %& 0 9 %&2 ız8 
31266 : 203 227 58 158 117 203 
31272: 91 40 4 22 255 24 Summe 5165 
31278 :& 20383 40 78 22 
31284 : 0 186 40 732 58 3 S31560 : 188 32 239 195 155 120 
31290 : 127 1985 Alı 38 177 31566 : 22935 94 35 70 35 
31296 : 62 255 186 40 4 >22 31572 : 78 35 642 22 215 120 
31302 :8 42 20 1% 31578 : 215 121 215 1264 234 1 
31308 : 184 40 50 70 122 2354 231534 : 40 18 229 20564 12 
1314.20 40 3 g- mai 31590 : 225 254 7 32 20 175 
31596 : 50 143 92 62 32 215 
Summe 5141 31802 : 24 Ii1 82 3 50 143 
21608 : 92 54 0 35 I2s 2ı5 
31320 : 5 AH12 58 158 11? 238 aisid : 43 123 234 2 40 1 
31324 : 255 50 158 117 62 7? 
31332 : 50 143 92 &2 2 215 Summe 5105 
ESS EE BEIGEO ERS SBNEST 122 S1620 : 242 30 10 2844 
31344 : 60 215 120 198 32 215 : 
; ae | 31626 :40 9 13 24 > 12 
31350 : 213 33 1000 17 20 | Ä 
N ie ir 1132: a4 = a1 4 
31356 : 0 205 i81 3 209 33 | ee 
Me S1&38 : 229 205 4 121 225 97 
31362 : 32 127 203 99 32 > si Be 
N = | 31644 : 254 13 32 4 225 195 
31368 : 35 126 43 203 7i 322 : 
31374 : 60 20367 40 4 2 s1650 ; 123 124 2544 40 8 
sc 31656 : 2346 40 4 254 71 
Wr 31662 : 32 31 22554 0 254 
Se 2027 31668 : 6 194 66 123 62 255 
ee er 31674 : 50 158 117 227 14 2 
31384 : 48 22 1 126 186 40 > 
31392 : 422 122 2341 325 Bekie 
Sımrn 2 90 22 Iı2d 37.8 31680 : 205 25 121130 2 
31404 : 22 255 42 22 215 &2 | 
Sie ne 31686 : 17 40 0 205 181 3 
s1410 : 18 215 12% 130 215 175 a. re 
: En: Se 31692 : 195 65 123 25347 32 
31416 : 50 14392 0 &2 22 ie 
=: a re 31698 : 44 120 254 20 32 39 
31422 : 21S &2 22 21562 19 | ER | 
> E > 31704 : 121 198 4 111 38 177 
31428 : 215 126 130 215 &2 32 LEN - 
VE Nee ne ey 31710 : 124 2340 0 28 35 
Ze | | 31718 ı 62 ?7 50 19392 & 
x 31722 : 22 215 120 215 121 215 
Te? 31728 : 126 198 32 215 33 60 
' 31440 : 215 126 215 62 6 50 31734 :0 17 20 0 205 181 
31446 : 143 92 0 62 41 215 Summe 5528 
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31740 : 3 24 177 122 254 3 31956 : 33 1852 90 6 60 126 





21745 : 32 101 54 ı 33 229 31962 : 254 71 40 :2 238 36 
31752 : 197 12033 0 72 zia S195B : 119 35 16 245 225 229 
21758 : 8 135 135 135 1353 135 a1974 : 17 1 0 205 181 3 
Ss1764 : 19 797 5 0 9 1765 
1770 : 254 3 40 4 72 &2 Summe 5393 
1776 : 24 2 22 6i 193 225 - 
217987 : i1l4 122 254 dl 40 23 | 21980 : 225 5 82 4 18322 
317988 : 123 25343 56 4 29 | 31988 : 221 52 33 59 55 123 
21704 : 29 24 2 28 28 203 31992 : 33 0 560 34 54 92 
| 31998 : 17 za 121 490 
Summe 5012 32004 : 20540 32 14 4 6 
32010 :0 1733 0 58 1264 
z31e200 : 7 0 4 22 5 24 22016 : 34 7ıı 290 4 54 7 
311806 :2 255 24 14 22 32072 : 24 2 54 120 17 1i 
31812 : 5 147 95 203 71 30 32028 : 88 1 2sS5 2 237 176 
s1818:4 22 83 24 2 22 22034 : 237 95 211 254 193 16 
3187274 : 84 62 7 50 143 922 
1830 : 62 22 215 120 215 121 Summe 5031 
218365 : 215 122 215 225 229 35 
© | 21942 : 115 35 112 35 113 195 32040 : 226 13 32 221 175 5 
| 31B48 : 55 123652 > 50 143 32045 ; 158 117 2ı1 254 14 7? 
u ' 31854 : 92 62 22 215 120 215 | 32052 : 62 22 215 121 215 62 
32058 : 1 2156 3 & 2 
„ Summe 5117? 32064 : 215 i6 251 12 82 20 
Bi: 32070 : 185 32 235 195 45 119 
_ 31860 : 121 215 62 47 215 24 32076 : S? 62 11 196 254 9 
=: sıaaa : 228 1? 244 126 33 250 22082 : 56 2 862 8 50 163 
21872 : 126 229 2136 6 26 =2088 : 119 198 32 So 250 119 
©: 31878 : 190 32 4 19 35 16 32074 : 205 107 13 2Z01 17 O0 
s1884 : 248 20# 225 48 5 1 | 
Fi 31890 : & ie) 237 176 33 34 Summe 4149 
318964 : 127 126 27341 2 3 
a. 3192 : 227 62 22 215.35 35 32100 : 0 33 0.7? 213 2297 
: 31908 : 126 7i 215 35 126 215 22106 : 205 181 3 225 209 43 
ie 21914 =: 120 214 11 2545 % 32112 : &2 255 188 32 243 201 
| | | 218:0 0 0 0:0 98 
E- ; Summe 5325 ı 32124 : 0 OÖ ie) # #) Ö 
m | 321390 0.0.0:0-0 oo 
21920 :5 62 32 21524 8 2135 :0 © © 9 0 DD 
BO: 31924 2 3 1 2 224142 :0 0.0.0 0.0 
319372 : 61 215 2251 6 OO 3241480 00% 9% © 9% 
31938 : 9 #2 128 188 32 Z0 aai1s4 * 0 0 0. ..0.,0 0 
21944 : 62 201 50 55 123 33 
21950 : 0 0 229 205 24 123 Summe 2379 


Programmautoren aufgepaßt! 

Das der Spectrum-Computer immer noch einiges „im Petto hat”, beweist nicht 
zuletzt dieses Programm. Der Tronic-Verlag sucht auch weiterhin Programmbei- 
träge für die etwas älteren Computersysteme wie beispielsweise für den TI-99, 

et Spectrum oder auch Apple. Wer also Interessantes z.B. auch Tips und Tricks, 

4 Abenteuerprogramme mit neuer Spielidee etc. zu bieten hat, wende sich an den 

. " Tronic-Verlag in 3440 Eschwege, Postfach 870. Wir zahlen ein Honorar von 

'» 120,- DM pro komplett veröffentlichter Seite! Also Autoren auf ans Werk — 

Es lohnt sich! 
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Sie sind frischgebackener Erbe eines schmucken Hauses! Leider hat das Ganze einen dicken Haken. 
In der Zeit nämlich, in der das Haus leergestand, hat sich ein eierköpfiger Hexenmeister mit seinen 
Geistern in das Haus einquartiert. Nun müssen Sie diese ungebetenen Mieter erst einmalvertreiben, | ' 





um Ihr Erbe unbeschwert genießen zu können. 






Steuerung: 

Die Knollennase des Helden zeigt immer 
die Laufrichtung an. 

Taste 5 : Schritt nach links 

Taste D: Schritt nach rechts 

Taste J : Sprung in Blickrichtung 

Taste T: Zauberkugel in Blickrichtung 
werfen 


In den Etagen lauern vielfältige Gefah- 
ren! Kleine dicke Gespenstertauchen wie 
zufällig auf und wollen Ihnen den Weg 
versperren. In der 2. Etage gibt es zudem 


#* HANS STOLICKA # 

120 REM HHHHHHHHHHHHHHN 
130 FOR I=1 TO 12 

140 CALL COLORIT,16,1) 

150 NEXT I 


BE Für den TI 99 4A 


an 


noch Stalaktiten, die herunterfallen kön- 
nen, In der 3. Elage erwartet Sie ein un- 
sichtbarer Geist und in der 4. Etage emp- 
fängt Sie der Zauberlehrling und der He- 
xenmeister wirft mit Kegeln um sich, 


Tips zur Lösung: 


50 oft wie möglich, sollten Hindernisse 
natürlich übersprungen werden. Der un- 
sichtbare Geist kann mit Wunderkugeln 
abgeschossen oder durch Springen über- 
listet werden. Man kann auch warten, bis 





100 REN HH * SI 170 CALL CLEAR 
MPLE SOFTWARE + # presents 180 PRINT " 

Mi HH | 
110 REM #* HOUSE OF HORROR # +44 Ba: 
RRHRHHHHHHHH *tor ti & ex-bas 190 PRINT ® 
ick * C 1984 by % 


ents"::;:: 


200 CALL SOUND (250, 242, 0,330,0,392,01 
210 CALL SOUNDI250, 262,0,330,0,392,01 
220 CALL SOUND(250,440,0,523,0) 
230 CALL SOUNDI(250,440,0,323,01 


#5IMPLE SOFTWAREH 


sinpie software proudly 


BR (auch ohne X-Basic!!!) 


Spielbeschreibung: 


Aber ganz alleine schaffen $ie das nicht. 
Zu Hilfe eilteine Fee, die in den Räumen 
Zauberkräfte und Wunderkugeln verteilt 
hat, die Sie einsammeln müssen, Diese | 
Zauberdinge wirken vernichtend auf die 
Geister des Hexenmeisters. 

Bei Spielbeginn befindet sich unser jun- 
ger Hausbesitzer in der untersten Etage 
auf der linken Seite. Jetzt heißt es, alle 
Hindernisse schadlos zu überstehen, um 
nach oben zu dem Hexenmeister zu ge- 
langen und ihm mit den unterwegs einge- 
sammelten Wunderkugelnkräftig einhei- 
zen. Allerdings haben die Wunderkugeln 
keine Wirkung, wenn man zunaheanden 
gelährlichen Objekten steht. Außerdem: 
die Aufgänge zur 3. und 4, Etage öffnen 
sich erst, wenn 2 Geheimnisse gelöst wur- 
den! 


er durch umherirrende Geister oder her- 
unterlallende Steine zerstört worden ist. 
Der Hüpfgeist in der 4, Eiage sollte sofort 
mit Wunderkugeln traktiert werden. 
Wenn man zu wenig Wunderkugeln be- 
sıtzt, kann man die löchrige Wand in der 
Mitte auch niederlaufen. Ist das ge- 
schafft, muß man dem Zaubermeister ei- 
ne Zauberkugel genau auf den rechten 
Fuß werfen. Sollte dies ebenfalls gelin- 
gen, können Sie sıch als Sieger beglück- 
wünschen lassen. 








HH 
IH 









pres 

























150 CALL SCREEN I?) 240 CALL SOUNDLSS0,523,0,6559,0) 





- Das Listing von „di OUSE OF HORROR“ 
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so FOR I=el TO 300 

ZS0 NEXT I 

?70 CALL CLEAR 

280 Dim RITTESIB,2) 

200 RITTE£IL,LI="H:STOLICKA”" 

300 RITTESIL,2)="RANG 2" 

310 RANDOMIZE 

2320 CALL CHARILOS, "1838083C5A18245C*) 
330 CALL CHART12S, "000000001B3C3C18"} 
340 CALL CHARI10O?,"LBEIS0AFCIFLFADAO") 
=s0 CALL CHARIFS, "OOFBFBFEOODFDFDF") 
340 CALL CHARI131,"00183C18183C3C18") 
370 CALL CHARI11Z2, "FFFE7CSCIHBSOLO"] 
380 CALL CHARtLOS, "LELITLOSCSALBZ243S") 
370 CALL CHARLIO0S, "OOSCFESAFESSSAFE”] 
2300 CALL CHARIL2O, "0000000000183C18")] 
410 CALL CHARtIIL, "OOSCFESAFESCZ4IC") 
470 CALL CHARIL1F, "FFDOFFBEFFEDSS43") 
430 CALL CHARI118, "FBDOFBAOFOEOSOAO") 
440 CALL CHARIPS, "a27Ea242427E4292" 1 
450 CALL CHARIB9, "O0070ALFLBOFOZIF"] 
450 CALL CHARISF, "02484500BA000280A") 
470 CALL CHARISO, "00C1024005810508"1 
480 CALL CHAR TFO, "O000BOCACCFCOAFO") 
490 CALL CHARLLZ2, "3CSA7E24187EASSE" | 
500 CALL CHAR 88, "3C5A3C18B7EBD24E?") 
#10 CALL CHARIF?2, "8080800080C080E0") 
520 CALL CHAR (93, "3C5A3C187EBD24E?") 
=30 CALL CHARIFI, "ZFAFSFA?ODLBODSD") 
=40 CALL CHAR (PB, "ONEEOO?FFODEEOO?F?T"] 
s50 CALL CHARII3S, "000080C0OC0B8000CH") 
=A0 CALL CHARLL3?, "EOFZBCOEFACOBSOENH"] 
570 CALL COLORIB,4,1) 

s80 CALL COLORIP,r,1&) 

550 CALL COLORI10,15,1) 

500 CALL COLORtilI,i1,2 

#10 CALL COLORL12,8,1) 

570 CALL COLORt13,10,19 

530 CALL COLOR(14,8,1) 

540 FOR I=2 TO ? 

550 CALL COLORIT,16,1) 

#4 MEXT I 

570 CALL COLORI1,2,1) 

5480 CALL CLEAR 

470 CALL SCREEN ZI 

?00 PRINT "onsnnnnassanDnnnnaGORnBEDEnD" 


uETSERS EN Sne ses Sen susnnsenn 


..—.—. BERTEERREREREERRRTEEERE LITE 


>10 PRINT "===. nn . 
sesersı®" 0 1984 HANS STOLICKA "::"o00 


nfafefefafafs]afelsfs[=1#[#[a]0]alala1=1=1#]=1#] = BSe 

720 PF&="HD USE OF HORROR" 
730 TY=12 

?a0 TX=3 

750 GOSUE 1840 

750 FOR. Isl TO 400. STEP 10 

70 CALL 5SOUNDI(-350,110,0,1947,3,1#110,0, 
-4,0) 

780 NEXT 1 

7#0 CALL CLEAR 

800 INPUT "SCHWIERIGKEITSGRADII-?FI? "IF 
Bio IF IF£{LI#+IF>?7)ITHEN 800 

B20 IF Fiä THEN B40 

830 PRINT ::"DU BIST WOHL ANFAENGER , WAS 


B40-PRINT 33314 E EIER EEE IE nennen 


850 REM INTRO ENDE & START 

B50 WERSUCH=I 

B70 K=2l 

Bad Y=3 

870 CALL CLEAR 

900 D=INTIRND#F20) +5 

910 NeF#5+3 

720 ZK=3 

730 REM SPIELFELD 

Fan PRINT Bee 


Re ee re" a" bh" he" " I . 
H MH : FR 
9#0 PRINT "'" YZ We W en 


Be Mi 6 BEIEIEEEEEENENE 
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940 PRINT "" PPPP* PPPPPP_' PPPP'pRr'mW" 
rp RTBEIDL nn 
F ie # .ä 
770 PRINT *' } in) a 
EETTERBERTEI BAT ar ad PPRPR"'PAPPR 
"P'PPPPR'PPPRP'” y 
$80 FRINT "' pp 
e 5 . tom 
DO = 
een) PRINT Pr en u a DL DE DE BE Don vu: Ba a: mu u Bu BE Du Du 0 u Eu Zu Du lt, 
KUERH P'PPPPP APR PN pP" 


F +) p' = | | 
10006 PRINT * pP p b % 
a =) ra Be. laden 13.13 77 a. Fa DB SSH. 


= 
|_ IE Bus Us BEE Be Ber u Be u u BE u u 


1910 PRINT Pr a a a u aa I ur DE EL HR Bu m u vr Du Du m I ne Eu EU DE 


1020 Tx=3 

1030 Tyel 

10940 PS="WUNDERKUGELN : " 

1050 GOSUB 1840 

1080 FOR I=i1 TO 3 

1070 CALL HCHARLLS, INTIRND#141+11,72) 
1080 NEXT 1 

1090 CALL HCHARtS,INTIRND#L0O)+15,120) 
1100 CALL HCHARL1,19,42,2K) 

1110 CALL HCHAR 11, INTIRND*20) +7, 120) 
1120 CALL HCHARtII, INTIRND#ZON +?,120) 
1120 CALL HCHARI11,D,35) 

1140 CALL HCHAR (16, INTIRND#15) +12,120) 
1150 CALL HCHARIIS, INTIRND#IS) +12, 120) 
1180 CALL HCHARI1,28,896) 

1170 CALL HCHARI1,27,58) 

1180 CALL HCHAR 1,30, VERSUCH+48) 

1190 TxX=3 

1200 TY=24 

1210 PS="KEHRE LIEBER GLEICH UM " 
1770 GOSUB 1840 

1230 CALL HCHARI11,29,13100 

1240 OP=INTIRND#101+15 

1250 CALL HCHARtS,0P,122) 

1250 CALL HCHARIK,Y, 108} 

1270 NIX=0 

1280 CALL KEYIO,R,T) 

1290. IF T=0 THEN 1280 

1300 REM START ACTION 

1310 UN=INTIRNDEN) +1 

1320 IF UM=4 THEN 3100 

1330 CALL GCHARIS,7,G) 

1340 IF G=32 THEN 4100 

{350 REM STEUERUNG (AENDERUNG FÜER J0YS 
TICK HIER) 

1360 CALL KEYIO,R,T! 

1370 IF R=74 THEN 1590 

1380 IF R=83 THEN 1500 

1370 IF R=68 THEN 1420 

1400 IF R=84 THEN 2570 

i410 GOTO. 1310 

1420 CALL HCHARIX,Y,321 

1430 Yayıı 

1440 CALL GCHARIX,Y,GI 

14S0 IF G{>32 THEN 1900 

1460 CALL GCHARIK+1,Y,6) 

1470 IF G=32 THEN 1900 

1480 CALL HCHARIX,Y, 108) 

14920 GOTO 1310 

1500 CALL HCHARIX,Y,32) 

IS10 Yer-l 

1520 CALL GCHARIX,Y,G) 

15350 IF 6t>32 THEN 1900 

1540 CALL GCHARIX+1,Y,6) 

1550 IF G=32 THEN 1900 

1560 CALL HCHARIX,Y, 108) 

1570 60TO 1310 

1580 CALL GCHARIX,Y,U) 

1590 CALL HCHARIX,Y,32) 

1500 IF U=108 THEN 1720 

1810 CALL GEHARIX-1,Y-1,61 

1620 IF G€)32 THEN 1700 

1630 Yar-2 


1540 
1550 
1650 
1570 
1580 
L5r0 
1700 
1710 
1720 
1730 
1740 
1730 
1760 
1770 
1780 
LFFO 
1800 
i8l0 
1820 
1830 
1840 
EM 

1850 
1860 


CALL HEHARIX-1,Y+1,107) 
CALL GEHARIX,Y,G) 

CALL HEHARIX-1,Y+1,32) 
IF 6{>32 THEN 1900 
CALL GCHARIK+1,Y,6) 

IF G=32 THEN 1900 

CALL HCHARIX,Y, 106) 
GOTO 1310 

CALL HCHARIX,Y,321 

CALL GEHARtK-1,Y+1,6) 
IF 6<>32 THEN 1900 
Yayız 

CALL HEHARIX-1,Y-1,107 
CALL GCHARIX,Y,G) 

CALL HEHARIX-1,Y-1,32 
IF 6<>32 THEN 1900 
CALL GCHARIX+1,Y,6) 

IF G=32 THEN 1900 

CALL HEHARIK,Y, 108) 
G0TO 1310 

REM STRING AN BELIEB. STELLE DRUCK 
FOR STRel TO LENIPS) 

CALL HEHARITY, ITX+STRI-1,ASCISEGEIP 


2,57IR,193) 


1870 
1880 
1700 
1910 
1920 
1930 
1740 
1750 
1750 
1970 
1780 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2040 
2070 
2060 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2140 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2240 
2270 
2280 
2270 
2300 
2310 
2320 
2330 
2340 
2350 
2340 
2370 
2380 
2390 
2400 
2410 
2420 
2430 


NEXT STR 
RETURN 

REM ABPRUEFEN HINDERNISS 
IF 6£>120 THEN 1990 

CALL SOUNDELIO,F80,0) 

CALL SOUND L100,765,0) 
ZKezktl 

CALL HCHARL1,19,32,9) 

CALL HCHARI1,19,42,26) 

CALL HCHARIX,Y, 108) 

GoOTO 1310 

IF tGC)BBI#16<>9SI THEN 2200 
CALL HCHARIX,Y, 107) 
FOR I=X-1 TO X-5 STEP 
CALL SOUND(-100,210,0) 
CALL HCHARII,Y, 107) 
CALL HEHARTI+L,Y,9S) 
FOR F=1 TO 10 

NEXT F | 

CALL HCHARII,Y,107) 
NEXT I 

%=X-5 

NaN-2 

IF G=131 THEN 2150 

IF G=95 THEN 2190 
PsS="VORSICHT UNSICHTBARES ETWAS” 
GOTO 2160 

P$="GUT GEMACHT - 
TK=3 

Tre2d 

GOSUB 1840 

GoTa 1310 

IF 6<>131 THEN 27240 

CALL GCHARLX,D,TRI 

IF TR(>35 THEN 2000 

GOTO 3850 

IF GC>119 THEN 2250 

GOTO 2770 

IF G£>118 THEN 2480 
AG=1INT(RND#3) 

CALL GCHARL4,14,61 

IF G=118 THEN 7400 

CALL SOUNDLL2O,-6,0) 

CALL HCHAR (6, 14,118 

IF AGC>0 THEN 2370 


4 


CALL S0UNDI100, 785,0) 

PS="GENICK GEBROCHEN " 
GOSUB 1840 

GOTO 3850 

Yayıl 

CALL HCHARIX,Y,106) - 
G0TO 1310 

CALL SOUND(120,-4,0) 


CALL HEHARIE, 14,32) 
IF Ab=0 THEN 2330 
Yeyti 
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2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2570 
2580 
2590 
2500 
2610 


. Za20 


2430 
2440 
24530 
r4-T-1e] 
2670 
25680 
2570 
2700 
2710 
2720 
2730 
2740 
2730 
Zr&0 
2770 
2780 
27F0 
2800 
2810 
2820 
2830 
2840 
2850 
2840 
2870 
2880 
zurd 
zF00 
2F10 
2920 
2730 
zF40 
2950 
a] 
2770 
29780 
2990 
3000 
3010 
3020 
3030 
3040 
3050 
3050 
3070 
3080 
3070 
3100 
3110 
3120 
3130 
3140 
3130 
310 
3170 
3180 
3170 
3200 
3210 
3220 
3230 
3240 


_3250 


CALL HCHARIA,T, 108) 
GOTO 1310 

IF G4>33 THEN 2320 
FOR I=si TO 4 

EALL HCEHARI%,D, 111) 
CALL HCHARIK,D,32) 
NEXT I 

GOTO 38530 

IF Gi>232 THEN 23530 
Haiti 

CALL HCHARIX,Y,107) 
GOTO 3850 

REM ZAUBERELÜGEL WERFEN 
IF ZK=0 THEN 30920 
ZKuik-l 

CALL HEHARI1,17,32,7 
EALL HEHARI1,19,42, ZK) 
CALL GEHARIK,T,GI 

IF G=105 THEN 2770 
CALL GCHARIK,Y+L,6) 
IF G< >32 THEN 2940 
CALL HEHAR IK, TY+1,120) 
EALL GCHAR IH, T +2,60) 
CALL HCEHARIK, Y+1,321 
IF G=74 THEN 2740 
IF G=l1# THEN 3670 
CALL SOUNDES30,-7,0) 
FOR I=l TO 4 

FÜR K=39 TO &0 

CALL HCHARIE,T+2,K) 

MEXT K 

ME#T 1 

CALL HCHARIX,Y+2,32) 

GOTO 1310 

EALL GEHARIK,TY-1,6) 

IF 6<>32 THEN 2940 

CALL HCHARIK,T-1,1201 

CALL GCHAR IK, T1-2,6} 

CALL HEHARIR,T-1,32) 

IF G=?5 THEN 2740 

IF Geli®? THEN 3670 

CALL SOUNDISOO,-7,0) 

FOR I=1 TO 4 

FOR ExX=57 TO 40 

CGALL HCEHAR IH, T-2,EH] 

NEXT EX 

HEXT I 

CALL HCHAR IK, Y-2,32) 

GOTO 1310 

CALL SOUNDI{IOO,1834,0) | 
CALL SDUNDI 100, 3500,00) | 
Fa=® KUGEL VERSCHWENDET !.! n 

TYym24 

Tk=e3 

GOSUB 1850 

GOTO 1310 

Tr=24 

Fe" # KEINE KUGEL DA # > 

T%=3 

TYr=24 

GOSUB 1850 

GOTO 1330 

REM MAUER ANGESCHOSSEN 

EALL SOUNDI100,-5,0) 

CALL HCHARIG,14,118) 

REM U -UNHEIL . 

DOM IX-11/5 GOTO 3170, 3450, 3950,3&70 
REF UNHEIL 4.ETAGE 

EALL GCHARIHK,0OP,G) 

IF G{>122 THEN 3270 

SAaINT{IRND#L3I +15 

CALL HCHARICKX,O0P,32) 

CALL GCHARIK,S%,6) 

FÜR I=si T0 5 

CALL HCHARIX,SK,6G) 

EALL HEHARIK,S%, 122) 

NEXT I 

IF G{>32 THEN 3850 

ECALL SOUNDIIOO, 278,0) 

OP=5% 


NaN-2 
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3280 IF Ni& THEN 2270 ELSE 3280 |” 4060. PRINT * ICH GLAUBE DU BIST DIESER 
3270 N=4 ) | AUFGABE NI 
3280 G60T0 1330 ECHT GEWACHSEN” 


g 4070 PRINT 3::::32333: 
32970 REM ETAGE 4 - 2, TEIL 2 
aan IF Yc14 THEN 1330 4oso PRINT "NEUSTART MIT RUM’! 


10 N=! 4070 END 
3310 N=INTIS+ IF/1.6)] | 
3320 TIP=INTRNDXS) +8 4100 REN FAUFGABETERFUEELT 
SEO SEAN EHCHARTE TSG 4110 CALL SOUNDI-3000,-7,0) 


Tr en | 4120 FOR Il=l T0.3 
3340 CALL HEHAR IS, 7,1371 He 


| Ä Anieginı 4140 CALL HCHAR(&,7,EX 
3360 CALL SOUND(1L00,193,0) AR (6,7, 
3370 CALL GCHARI#,1,6) 4150 CALL HCHAR (5,5,ER] 


| 4160 CALL HCHARLE,6,EX) 
3380 CALL HCHARt&,1I,126) 8 

3390 IF 64>32 THEN 3850 4170 CALL HCHAR IS, 7,EX! 
3400 CALL HCHARt5,1,32) 4180 NEXT ER 

a410 NEXT I #190 NEXT I 

34720 CALL HEHAR(S, 7,970) | 4200 CALL SOUNDI-2000,-7,0) 


3430 CALL HCHARIS,?,F2) 4210 FOR I=1 TO 20 
3440 GOTO 1330 4220 CALL SCREEN 16) 


3450 REM UNHEIL 2. + 3.ETAGE 4230 CALL SCREEN I®) 
3450 Wa=siINT IRND#ZS) +4 4240 CALL SCREEN (2) 
3470 CALL GCHARIX-3,W8,6) 4250 NEXT I 

3480 IF NIX>14 THEN 36570 4260 CALL SCREENIS3] 


3490 IF 8C>112 THEN 3960 4270 CALL CLEAR 
: 4280 RESTORE 


3500 NIX=NIX#+1 | m. 
3510 CALL SOUND(3F0, 150,0) | 4290 PRINT * — EHHHHRHRRRRRHREE 
3520 CALL HEHARIX-3,WR, 32) Er: BERN * HH 
3330 CALL HCHAR IX=2,Wa, 112) | NE NT E 

3540 CALL HCHARIK-1, WO, 112 4300 FOR I=1 TO 10 

3550 CALL HCHARIX-2,W0, 32) 4310 READ 72,55 

3550 CALL GCHARIK,WE,G) 4320 CALL HCHARI21,8+WW, 22) 

3570 CALL HCHARIK-1,W9,32) 4330 WW=hW+Z 


3580 IF YeWa THEN 3850 4340 TY=21 
3590 FOR Isi T05 4350 CALL. SOLND (300,88, 0,55+2,3,85-2,31 
4350 NEXT I > 


3500 FOR EX=57 TO &0 
3610 CALL HCHARIK,WA,ERX) 
2620 NEXT EX 

3530 NEXT I 

3640 CALL HCHAR(X,WR,32) 
3650 HK=INTIRND#2) +1 


3660 IF HKk=1 THEN 1330 
3470 REM UNHEIL 1.ETAGE 4400 PRINT "WEGEN DEINER UEBERRAGENDEN 


S&80 CALL SOUND (200, 220,0) LEISTUNGEN IN DER MODERNEN GESFENSTERBE 


3590 CV=INTIRND#221 +6 KAEMFFUNG " 
3700 CALL GEHARIX,CV,@) ä41l0 PRINT "ERHAELTST DU DEN GESPENSTER- 


4370 KL=INTIF+IVERSUCH/3"-1L1} 
380 PRINT :"3# GUT E A Ri; BEI T -#* 


4390 FRINT "DU HAST ALLE GEISTER IM 
HOUSE OF HORROR ERLEDIGT a — 


m m m u m u m 





3710 CALL HCHARIK,CV,105) ORDER NEBEN AIRLAESE: .ıN--- -unnunne 
3720 IF (8=104}+1i9=108]1 THEN I | Veen Er en 

3730 CALL GCHARIK+1,CV,6) 4420 INPUT "NAME ? ":NR= 

3740 IF 64>32 THEN 3840 4430 PRINT "VIELEN DANK, " 

3730 CALL HCHARIK,CV, 32) 4440 FOR Iel TO 100 

3760 CALL HCHARIX+1,CV,105) 4450 NEXT I 

3770 CALL SOUNDI&S0,-7,0) 4450 FOR Il OB 

3780 FOR I=i T0 5 4470 IF RITTESEI,I="" THEN 4490 

3790 FOR Ex=59 TO 60 aaO NEXT I OO 

36800 CALL HCHARIK+1,CV,ER) 4470 RITTESIT,IIeNRE 

3810 NEXT EX 4500 RITTE#II,2)="RANG "ESTRSICKL) 

3820 NEXT 1 WM 4510 CALL CLEAR | 

2830 CALL HCHARTH+1,CV, 32) 4320 PRINT : "LISTE DER ORDENSTRAEGER : 
3840 GOTO 1330 nannnonanDannnnnnBnnnDoennnn" 

3850 REM HELD TOT 4530 FOR I=1 TO 8 a | 

3840 CALL SOUNDt1000,-7,2) 4540 PRINT RITTES{I,L},RITTESII,2) 

3870 FOR EX=1 TO 10 4550 NEXT I 

3880 FOR I=57 TO 50 4540 FRINT :: "00000000000500000900000050 
3870 CALL HCHARIX,Y,TDI 00 * NEUES SFIE 
3700 NEXT I LE kJ/N) I | 

3210 NEXT EX 4570 CALL KEYIO,R,TI 

3920 CALL HCHARIK,T,32] 45860 IF T=0 THEN 4570 

3930 PS="PECH GEHABT " 4590 RANDOMIZE 

3940 GOSUE 1840 4500 CALL ‚SCREENI2) 

3950 FOR I=si TO 100 46410 IF R=?d THEN 270 

3960 NEXT I 4620 DATA 71,247,82,262,65, 262,84,494,55 
3580 GOSUB 1840 " 


3990 CALL KEYIO,R,T) 

4000 IF T=0 THEN 3990 

4010 IF R=?8 THEN 4050 

4020 VERSUCH=VERSUCH+! 

4030 IF VERSUCH>F THEN 4050 
| 4040 GOTO 370 
| 4050 CALL CLEAR 


Das der 71-99 i immer noch voller po- 
sitiver Überraschungen ist, beweist 


nicht zuletzt dieses Programm! 
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Jolles MSX-Programm x Tolles MSX-Programm % 


Fred and the Bubloids 





SJGEN BITTE 


Weil Fred ein Loch übersehen hat, das sich 
mitten auf der Straße befand, konnte er 


nicht mehr ausweichen und ist kineingefal- 
len, Alsernach einem tiefen Sturz unten an- 
kam, bemerkteer sofort, daßerin einefrem- 
de, geheimnisvolle Welt geraten war. Als er 
sich efwas genauer umsah, stellte er fest, 
daß er sich in der sagenhaften Welt der Bu- 
bioiden befand. Die Bubloiden sind seltsa- 
me blasenfürmige Wesen, die sehr gefähr- 
lich sind und sofort jeden Fremden verfol- 
gen, um ihn ins Wasser zu ziehen, Fred muß 
also ständig auf'der Hut sein, um sich nicht 
var den Bubloiden erwischen zu lassen, da 


er sonst eines seiner drei Computerleben | 


verliert. Ebensowenig darferins Wasser fal- 
len, da auch das ein Leben kostet. 


Helfen Sienun Fred, den Ausgang aus der 
Welt der Bubloiden zu finden. Dazu muß 
erinjedem der zehn Räume zehn Schlüs- 
sel finden, um in den nächsten Level zu 
gelangen. Hat er in allen zehn Räumen 
den Ausgang gefunden, kann er endlich 
wieder ans Tageslicht klettern. 

Im ersten Level wird Fred nur von einem 
Bubloiden verfolgt, aber schon im zwei- 
ten Level sind zwei Bubloiden hinter ihm 
her. Später wird er sogar von drei Bubloi- 


den belästigt, die sich immer wütender | 


werdend aufihn stürzen. Außerdem wird 
Fred in den höheren Level von Lächern 
behindert, die über den Boden wandern. 
Um:Fred zu bewegen, kann man entwe- 
der einen Joystick oder die Cursortasten 
(zum Laufen und Klettern) und die Leer- 
taste (Zum Springen) benutzen, wobei es 


egal ist, an welchen Port der Joystick an- | 


geschlossen ist, 

Für Anfänger empfiehlt es sich, mit der 
Tastatur zu spielen, da man mit den Cur- 
sortasten olt genauer steuern kann, als 
mit einem Joystick. 


Wem die Hintergrundmusik besonders | 


gut gefällt, oder wen die Musik stört, der 
kann die Lautstärke mit den Tasten I (= 
lauter) und 0 (= leiser) nach seinem per- 
sönlichen Geschmack regeln, 

Ist das Spiel beendet, so wird.die erreichte 
Funktzahl angezeigt und man kann even- 
tuell'seinen Namen eintragen, wenn man 
einen neuen Hiehscore erreicht hat, 
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|110. CLEAR 200,49999'! 





entfliehen? 





Anleitung zum Abtippen des Programms: 


Das Listing besteht aus dem Basiclisting 
und zwei Programmen, die den Maschi- 


 nencode erzeugen. 


Als erstes wird das Basiclisting abgetippt 
und mit SAVE oder CSAVE gespeichert. 
Danach wir das Listing „MCLOADER 
Teil 1" abgetippt und mit RUN gestartet. 
Das Programm erzeugt nun den Machi- 
nencode von Adresse 50175 bis Adresse 
54974. Hat man einen Tippfehler im Pro- 


gramm, so wird sofort die Zeile gemeldet. | 
in welcher sich der Fehler befindet, Die | 


Zeile muß dann korrigiert werden, bevor 
das Programm erneut gestarlet wird. 
Wenn das Programm mit der Meldung 
„OK“ endet, ohne einen Fehler gefunden 


, zu haben, wird das Listing „MCLOADER 
Teil 2° abgetippt und ebenfalls gestartet. 


nee - ee Di 


SCORE Quhe dl 






BERBARI: 


10 RER 120 


Dieses Programm erzeugt jetzt den Rest 
des Maschinencodes von Adresse 54975 
bis Adresse 57974. 

Findet das Programm keinen Fehler in 
den DATA-Zeilen, so wird die Meldung 
ausgegeben, daß der Maschinencode kor- 
rekterzeugt wurde und man kann wählen, 
ob der Maschinencode auf'Diskette oder 
auf Kassette gespeichert werden soll. 
Wenn das Programm aufCässette gespei- 
chert werden soll, muß unbedingt darauf 
geachtet werden, daß das Maschinenco- 
de-Programm direkt hinter dem Basic- 
Programm aufgenommen wird, da der 
Maschinencode automatisch vom Basic- 
Programm geladen wird, nachdem das Ti- 
telbild gezeichnet wurde. 







u 


HIS="Fred'":HI=100 


20 '% +130 COLOR 2,1,1:SCREEN 2 

so !% FRED AND THE BOBLOIDS “140 OPEN "GRP:'" AS #1 

40 'k a m m m a ir nn nn ET RE ET 

50 '% für #54 -Computer #160 FOR X=0 TO: 235 STEP a] 

50 '% #170 Y=37r37+351IN 0X725) 

707 '# 0) 1986 by Peter Weiland *180 PRESET Ku82: PRINT 

BU '!x + Fl, As | 

a0 EKFEFFFFKELHEEI TEICHE 0 PRESET (X, 176-T): PRINT 

100: '" ur #1, A® 
200 NEXT X ] 
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Gelingt es Fred aus dem 
Raum der Bubloiden zu 










| 23236) THEN 810. 
840 IF A/82=1NTCA/32) THER BIO 
850 IR <A+13732=INTCCA+19/32) THEN 810 


— en nn in U 


5 216 COLOR 4 E 
== ‘550 PRESET (106,40): PRINT #1," Wecomp 
> 230. PRESET (110,40): DRAW "C4S4RA2DBL2BLA 
5 \La2U8R2" 860 IF (A+2)/32=1NT((A+2)/32) THER 810 
‚240 FOR N=1 TO S 870 SOUND 4,100:S0UND 5,1:50UND 7,248 - 
550 LINE (129-5*N,60-2kR)-(127+5%W,60-2% | aa0 SOUND 10,16: SOUND 11,0:S0UND 12,20 ci 
0,4 890 SOUND 13,1 N 


b E 260 LINE (129-5x8, 28+2xNW)-(127+5#0,2842# | 000 VPOKE A,9:VPOKE A+1,10 = 

1 E,4 910 VFOKE A+32,11:VPOKE A+33,12 di Hm 
© 270 NEXT N 920 VPOKE A+64,13: VPOKE A+65,14 | 

u 1280 COLOR 8 - ...1930 POKE 57937! PEEK(57937!) OR 1 

5 290 X=94: Y=65; As="präsentiert:":GOSUB 10 | 940 FOR H=0 TO 99: NEXT N 

‚30 950 SOUND 4,0:50URD 13,1 

| ‚300 COLOR 10 960 FOR N=0 TO 255:NEXT N 

#310 As="FRED AND THE BUBLOIDS" 970 SOUND 7,252 


"320 PRESET (43,88): PRINT .#1, A$ 
_ ;330 PRESET (A4,88): PRINT #1, AS 
‚®# 1340 COLOR B Ä 
‚350 X=87:Y=101: A$="Copyright 1986" :G0SUB 
© ) 1030 
—+360 X=122:1=109: AS="by":GOSUB 1030 
'370 X=90: Y=118: A$="Peter Weiland'":GOSUE 


9860 RETURN 
990! 
1000 GDEUB 690:G0TD 650 
1010 GOSUB 810:G0T0 650 
1020 ' 
| 1030 IF As="": THEN RETURN 
1040 PSET (X, Y?,1:PRINT #1, LEFTSTAS, 1} 





FE ;:1030 1050 A$S=RIGHTS CAS, LEN{ASI-1):X=X46 
'sa0 S=0:FOR N=501556! Tü Sso286!:5=5+PEEK( 1060 -GOTO 1030 
e:M:HEXTN 1070 * 
#390 IF 5=15827 THEN 460 1080 COLOR 15,4,4:SCREEN 2 
‚400 COLOR 4 1090 RESTORE 1380:FOR N=1 TO 3 
& 410 X=36:Y=184: AS="Der Maschineneode wir | 1100 READ A,B,C:LINE (0,A)-(255,B),C,BF 
'd geladen. ":GOSUB 10530 | | 1110 NEXT N | 
420 POKE 64922! ‚201: SOUND 7,255 1120 CIRCLE (227,30),20,10:PAINT (227,30 
© 430 BLOAD "FREDAC" >»,10 
"AAO DEF USR1=52163!:Q=USE1 (0) 1130 FOR: N=0 TO 6.28 STEF .315 
= 450 LINE (36, 184)- (220,191),1,BF 1140 LINE {227,303- (227+60%51N (N), 30+60% 
” 460 COLOR 4 COS<NH)), 10 
| 470 X=18: Y=184: A$="> Leertaste oder Feue 1150 NEXT N 
5 rknopf drücken <":GOSUB 1030 1160 FOR B=1 TO 4:READ X, Y.R 
430 CLOSE #1 1170 CIRCLE (X, Y),R-5 


430 DEF USR1-52859!: Q=USR110) | 1160. PAINT (X, Y) 


© ‚6500 IF 60 THEN GOSUB 1790 ELSE GOSUR 167 | 1160 CIRCLE OGR,D,R 
u, © 1200 PAINT X+R,YD 
= „ 510 POKE 57938! ,7:POKE 57939! ,3 1210 CIRCLE CX+2x&R,YD),R-3 


‚520 POEE 57942!,5:FOKE 57955!,1 
| 530 X=RND(-TIME) 
= .540 DEF USR=50186! 
| 550 GOSUE 1050 
I E60! 

570 DEF USR1=51779!:Q=USR1(0) 

580 FOKE 57969! ,, PBEEK (57900!) 

I. '590 POKE 57970! ,PEEK(57901!) 
= 600 POKE 57934!,250 


1220 FPAINT CX+r2x+R+2,T+2) 
1230 NEXT N 
1240 PAINT (238,50),15 

1250 FOR N=5 TO 250 STEP 40 
| 1260 LINE (N-2,110)3-(N+2,133),6, HF 
1270 CIRCLE <N,100),15,12 

1280 PAISNT (9,100), 12:BEXT N 

1290 LINE {119,1407-(136,1403,1 
1300 LINE (136,140)-(140,1579,1 
1310 LINE 1(140,157)-(115,1573,1 
1320 LINE (115,1573-(119,140),1 
1330 PAINT {130,155)3,1 
1340 LINE (120, 143)-(135,140),6, BF 
1350. PUT SFRITE 0, 1124,1543,3,36 
1360 PUT SPRITE 1, (124,162),6,37 n 
1370 RETURN 

1380 DATA 168, 191,1,163,167,6,130, 162,3 

1390 DATA 15,30,19,80,60,15,110,22,20,19 
0,50,18 
1400 ' 
1410 DEF USR1=50502!:Q=U5R1 10} 

1420 GOSUB 1080 
| 1430 LINE (124, 191)-(124,1369,4 

1440: LINE (131,191)-(131,136),4 
1450 FOR N=190 TO 136 STEP-4 
1460 LINE (124,W1-(131,0),4 
1470 NEXT N 
| 1480 DEF USR1=50767!: Q=USR1 (0) En - 
1490 OPEN "GRP:" AS #1 = 
1500 LINE (55, 14)-(200,72),4, BF 
1510 A&=STRINGS (18, "%") 
1520 BS="$"+SPACBS (16) 4" %" 

1530 PRESET (58, 16): PRINT El.AS. 


510 ' 
© 620 GOSUB 690 
630 DEF USR1=51066! :Q=USR1 (0) 
540 ' 
'650 Q=USR{0) 
660 ON PEEK (57936!) GOTO 1000,1010,1410, 
'570,630,1790 
670 GOTO 650 
680 ' 
© ‚690 A=6144+1HTCRND(1)%704) 
700 IF VPEEKCA)<>32 THEN 690 
710 V=VPEEK(A+32) 
20 IF V<112 OR V>239 THEN 690 
730 IF A/S2=1INTCA#32> THEN 690 
780: IR CA+1)32=INTCA+1)/32) THEN 690 
750 VPOKE A,8 
| 760. POKE 579451, A-256#INT (A/255) 
= 770 POKE 57946!', INT(A/256) 
780 POKE 57937! PEEK(57937!) AND 254 
790 RETURN 
800 ' 
810 A=6144+1NT{RND(1)*608) 
820 VI=VPEEK(A+96): V2=VPEEK (A+97) 
830 IF (V1<112 OR V1>239) AND (V2<112 OR 
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1550 PRESET (58,37: PRINT #1,B8 


‚41560 NEXT N 

1570 PRESET (58,647: PRIRT #1,43 
‚1580 AS="GRATULIERE!" 

‚1590 PRESET (87,307: PRINT #1,4A3 
1600 PSET (88,30),15: PRINT #1,A& 


1610 A$="Du hast es geschafft!" 
15620 FOR 3=1 To 21 


1630 PRESET (60+46X*N, 50) 


1640 PRINT #1, MIDSCA$,N,1) 
1650 NEXT N:QQ=-1:G0TO 440 


‚1i660 ' 


15670 SCREEN 1,0:WIDTH 30 

1680 COLOR 2,1, 1: KEY OFF 

1600 PRINT TAB{10}" ABLEITUNG: '" 

1700 PEINT:PRINT "Helfen Sie Fred, den W 

eg aus dem Reich der Eubloiden zu I 

inden.' 

1710 PRIET "Fred muß in jedem der zehn 
Räume jeweils zehn Schlüssel finden, 

um in den nächsten Raum zu gelangen. 

1720 PRINT "Dabei darf er sich nicht von 
den Eublolden fangen lassen, oder in 


's Wasser fallen, da er dann eines seiner 


drei Compu- terleben verliert." 


‘1730 PRINT "Steuern Sie Fred nit ainen 
taste u 


Joystick oder mit der Space- 
nd den Kursortasten." 


‚1740 PRINT "Sie können die Lautstärke de 
'r Hintergrundmusik mit den Tas- ten 0(= 
‚leiser? und i1{=lauter) regeln." 

'1750 LOCATE 0,22: PRINT " Alles Klar? Da 


nn Leertaste oder Feuerknopf drücken. 
1760 DEF U5R1=50659! :Q9=USR1 (0) 

1770 RETURN 

1760 ' 

1750 SCREEN 1:COLOR 2,1,1:WIDTE 21 


1800 DEF USR1=50745! :Q=USR1 (0) 
1810 DEF USR1=342: Q=USR1(0) 
1820 SC=PEEK (57971! )+256%PEEK (57972! ) 


1830 IF SC>HI THEN 1960 


‚1840 LOCATE 1,12:PRINT "Du hast": SC; "Pun 
'kte erreicht." 

1550 LOCATE 0,6: PRINT "Highscore: "; HIs;H 
1;"Punkte!" 


1560 LOCATE 1,20: PRINT "Noch ein Spiel? 


‚*J=Ja#/N=Bein}" 


1870 IsS=INKEYS 


‚18580 IF Is="j" OR Is="J" THEN WIDTH 32:6 


uIO 510 


‚1890 IF IS<>"n" AND Is<>"m" THEN 1870 


1800 FOR N=1 TO 4: PRINT:NEXT # 
1910 PRINT TAB{SI"GOOD BYE... ." 
1920 FOR N=15 TO 2 STEF-1 


1930 COLOR N: FOR F=0 TO 99 


1940 NEXT F,N:END 


‚1960 LOCATE 0,0: PRIBNT"Alter Highscore: " 
‚1970 LOCATE 3,2: PRINT HI; "Punkte von ".H 


1980 LOCATE 3,7: PRIBRT"Du hast mit" :-EC;"p 
unkten' 

1990 PRINT"einen neuen Highscore erreich 
in ..4 


0, CSELIN-1 : 
2010 IEPUT "Wie lautet Dein Name'":Hl1s 
2020 IE LEN{HIS)I>B THEN HIE=SLEFTSCHIS, 8) 


2030 HI=5C:CL5:60T0.1850 


68° HOMECOMPUTER 








10 KEIL KFELEEEEEEN NE 


eo "% # 
30 '% MCLOADER FÜR FRED TEIL1 x 
| 40.7 &----------------.u. 
| 50 '€ Adressen 50175 - 54974 x 
50 .7% = 
70 '* (631985 by Peter Wailand % 
80 "x + 


GI KETTE 
100 

110 CLEAR 200, 499901 

120 A=-50175!:2=1000 


| 130 FOR N=1 TO 120 


140 5=0 :FOR F=1 TO 20 

150 READ F&: P=sVALt"&h'+Ps3: IF P<o TEEN EP 
=P465536! 

150 P1=P-256£1NT {P/2563: S=S+P1FA 

170. FPOKE A, Pi: A=4+1 

130 P2=1NT (P/2589: 8=54P2H+ A 

190 FOKE A, F2: A=4+1 


| 200 NEXT F = 


210 5=5-65536! #INT(5/65536! ) 


220 READ P&: P=SVAL("sSH"4Ps)1: IE P<O THEN P. 
| =P+65536! 
230 IF S<>P THEN BEEP: BEEP: PRINT: PRINT"D. © 


ATA-Fehler in Zeile": Z: END 

240 Z=e2410:NEXIT N 

1000 DATA FFOO, FFFF,FFFE,FFFF,FFEF,CDEF, 
DEB7 , DOCD, CDDD, DEA9, EACD, CDDD, E0O07, ORCD, 
CODE, DDF&S, BDCD, CODD, DF&C, A4CD, C1D0 

1010 DATA CDDG, DC5SA, FECD, CDD7., C7C7, D401, 


' CD30, DEB1,503A, B7E2, FEC8, D007, 05SFE, 42CA, 


FEDS,CA06, D899, OLFE, 0520, 5ACD, 9B4E 
1020 DATA 18C4, FE1S, 2002, CDOS, DABs, 0C18, 
OSFE, 0520, 22CD, 1809, CDO3, D979, B8C3, CDC4, 


| DEA9, 5CCD, CDDF, C7BE, CECD, 01DF, F2BC | 
1030 DATA 270F, BiCD, 21DE, E22C,C67E, 7704, 
BSFE, E338, 32AF, E247, 8CCD, 21DF,C4A8, 0706, ! 


AICD, 10C4, O1FB, 0000, B1CD, CDDB, 52F9 


1040 DATA DEB1,237E, 235E, 93C3, 0600, 0708, . 
OADS, 0C10, 0432, 0500, 0D00, 0701, 01FC, D903, 


EICH, ZIDE, 1AF6, 4ACD, 3D00, 4DCD, 2602 


1050 DATA FEOO, 2830, 3E06, 3205, E250, CDc9, ' | 
C5A8, 0021, AF1B, 2006, FOCD, 21CA, 18C8, 1011, ; 


0100,1007,26CD, 21C5, 18E9, 2A3E, E682C 


1060 DATA 0501, CDOE, C528, 0A21, 0119, 0003, , 
26CD, 2105, 192B, 3411, CDCS, D6B9, DO13E, 10D8, ' 


0821, 0620, CDO4, CAFO, 0157, 8235, FA63 
1070 DATA BiCD, TADB, 31FE, EA30, ABCD, 3805, 


1806, 3EA8, C520, FOCD, CICA, 0019, F720,1313, 


47C9, 4D41, 2045, 4F20, 4556, 0052, 89B4 


1080 DATA 2020, 564F, 5245,2100, 1B0B,06AR, ı 


CD18, CAFO, A8CD, 3ECS, 3204, E26C, OA3E, 6F32, 


 SAE2, E22C, DOCD, CODE, DEES, 3AC5, 1427 


1090 DATA E22D, DOCD, 16DE, 5F00, 21C1, 1860, 


0919, E011, 3EFF, CDEO, 004D, 7C19, 18FE, #530, : 


0338, 4732, 21E2, E22D, D67E, 7704, E73B 
1100 DATA ES2B, 8CCD, 01DF, 56CE, BiCD, EiDB, 


| D67E, 7704, BEFE, ED38, EDFE, E930, 2109, 0000, | © 


7322, 21E2,1AE7, 1011, CD27,C5CA, SEB1 


1110 DATA E811,CD03, CSCA, 8411, CD00,C5CA, . 


QAIE, CACD, 1EC5, CDO1, 004A, FE23, D831, 2AES, 
E273,30D6, 1947, FD10, 7322, E1E2, 6891 | 
1120 DATA E2C9, C9E1, 203E, AF32, CDF3, C639, 


2021, 3E18, 06C4, CD20, CAFO, IF11, 0600, CD13, . 


004D, CD19, C64A, F710, 2006, FOCD, ZDF4 


| | 1130 n CA.CD05, DBB1. 2018 Br 
‚2000 PRIST SPC(22);STRINGS(B,"."):LOCATE| na 1902, 0009, DBBI, 2015, 21FA, 2000, 


2006, 5FED, OFES, 0O2FE, F838, 0707,0707,4ACD, 


1006, 1EEF, 1600, 7A03, CD3D, 00D8, 5BFE 


1140 DATA COB7, 2015, 1DF6, F120, D718, 0821, 


0602, CDD0O, 004A, OF4F, CDE1, C6AA, F510,CDc$, 


DO4D, 6923, C021, 227C, E230, 3422, BAAF 
1150 DATA 22E2, E238, 2801, 16C7,CD07, DSEl, 


.0304, 1577 F720,0C06,CDCS,DFac,CEO1,cDSe, 
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—BBE1, 2621, 3562, 3535, C135,EC10,6B77 


'1160 DATA 023E, 4732, 01E2, 07565, ESCD, 3EC5, 
ıC501,9ACD, C1C6, 0316, AOCD, 15C6, FA20,32AF, 
ı E247,8C0C3, CDDF, C6EB, D5C5, 0021, C622 


' 93CD, 1500, EF20, 9C01, CDAD, DBB1, D36F 
1180 DATA OT3E, FC1E, 93CD, E100, 06AF,CDOßB, 


zu mE mm vum mm Gm cum 


‚1210 DATA D806, 8407, 0Al0, 00B9, 270B, DCOL, 
' 0106, 8COD, 80DF, 03DD, E22D, E230, DD80, DDSD, 


ı 4732, 32E2, E24A, 712A, 22E2, E22C, ZEll,2Z1E2, 
 crD2, 0E01,EDOD, CDBO, DF3SC, BECD, B4C0O 
‚1230 DATA CGDG7, DDEA,B7CD, O6DB, OEDE, 7903, 
' C53D, B2CD, BOC7, C0OC1, 200D, 10F4, 16F0, FSES, 


0044, 60EE, 4DC3, 0000, OAOF, OCFO, AD0D, 1004, 
0402, 1604, 0104, C82C, 0716, 1CCD, 840B 


'1E01, CD60,C822, 0021, 1E04,CD40,C822, Z1EB, 


0809, 0700, 427E, 4242, 427E, 4242, E891 


‚1280 DATA 0010, FF00, DCFF, 0898, 0008, FFOQ, 
ı FREE, TERF, 3034, FFO0, FFFF, 293D, 0008, FBO0, 


‚1300 DATA EEFF,FFFF,FFFF,4038,3E00, 3E41, 
0808, 3838, 7FOB, DACA, DACD, FFCA, FEFC, R7A3, | 


:8080,8080, O1FF, 0101,0101,0101,78FF,0308, 
'7100,82BA, 0A72, 7184,C700, 0828, BES 
1320 DATA 0808, C728,3C000, ASA2, ABBG, Z2ZA4, 


'1330 DATA 0808, 8808,7000, 8288, 0A70, 7088, 


‚85800, CAC8, 9AAB, 8898, 8300, 8282, 558D 
1340 DATA 8283, FB&2, E800, 0808, 05C8, E205, 
.BEOO, AUAD, 20BC, 3E20,8000, 8250,8280,F880, 
‘D020, 0000, 8AF1, FZ28A,BABA, DOF1,58DA 
‚1350 DATA 2CC8, 2A2C,2929, 00CB, AZAZ, AZAZ, 


‚2121, 2323, 1E23, 0C04, 2414, 0C0C, AA56 
1360 DATA 1E0G, 211E,.0E01, 3030, 3F350, Z11E, 
‚0E01, 0303, 1E23, 0602, 120A,3F26, 0606, 203F, 
'3E20,03093,1E23, 211E,3E20, 2323, 245€ 


‘1621, 2323, 1E23, 211E,1F21, 0303, 1E23,413E, 
'1380 DATA 09942, FFFF, 2442, 2418, FF42,FFFF, 
'8181, 00FF, 0000, FFFF, 3C7E, 0018, DOSD 
1399 DATA 0000, 55AA,55AA,0000,0000,99FF, | 


'9999, FF99, 0000, a1FF,2442, 0018, 0000, 201E, 
‚0141, A120, 2006, 07F4, F420, 200C, FOA7 


‘1170 DATA 111B, 0004, 3D3A,47C7, 1019, ESED, 


3E01, 16C7, 0A08, ADCD, 0300, 0A23, 5F03, 030A, 


‚ 004D, 1023, 21FA,C73D, 3434, C1D1, CDC9, D6El, 
' 0B22, CDC7, DSE1, 0E22, 0AC7, 3203, AEDE 
ı 1190 DATA C71B, ElCD, 2206, C717,E1CD, 2206, 


' CT1E, D5C5, 1E06, CDCS, DCFA, E7TCD, 0105, 270F, | 


BICD, 21DB, E239, C6TE, 7702, 0021, 9416 
1200 DATA 3500, C135, E410,C1D1,48C9, DLEZ, 
E246, 3003, 02C7, DFC3, C428, 1BDF, E22C, 2DB9, 
TCE2, 8208, 0400, 0089, 2605, 0610, 9418 


3102,34582,3DE2, FADD, 02DC, E235, BAFC 
1220 DATA E238, DCFA, CSE7, 3902, DDEZ, AFDD, 


DSCD, 4700, C5F1, DSCD, C100, CDC9, 0902 
1240 DATA DD80, 3DCD, CODD, DCFA, 0121, CD20, 
1250 DATA 15C8, FA20, BO21, OSEF, 4D44, 8021, 
FFCO, 4409, EB4AD, 401E, 22CD, 16C8, D6D7 
1260 DATA CDOS, DSELl, 030A, 4DCD, 1500, FSB, 
0AC9,SFO3, EiCD, OADS, CDOS, 004D, 1023, F7z0, 
1270 DATA 8060, FF03, FFFF, 93DF, 0000, FFÜD, 


FFFF,35ED, 0010, FFOO, FBFEF, FIFB,A0El,FFO0O, 
FRFF,37TF, 0022, FF00, TFFF, 1ASE, ACE3 


FBFE, DFOO, DFDF, FE0O, FöFB, D000, C792 
1290 DATA 80D0,FBO0, 1B3B, 0FO0, 0003, FFODO, 
FF99, FFO9, 0000, 1800, 0780, 0000, 7E1B, FFFF, 
FFFF, 0000, 0000, E781, FFFF, FFFF, BS25 


ETB7, FFB7, FOSF, GOEO, 80C0,8080, 6789 
1310 DATA OF80, 0707, 0103, 0101,8001,5080, 


F800, 8280, 82F0, F380, 0200, 0202, 0203, 0202, 
2F00, 8848, 880F, 2F48, A200, 1422, 0D02 


0800, 0AOD, 080A, 0808, BEOD, AUAQ, ADBC, BEAU, 


A2A2, 0090, 8870, 7082,880A,5070,0080, 211E, 


1370 DATA 1E23, 013F, 0402, 1E0C, 0C0C, Z11E, 
083E,3808, 0838, 4299, 9924, 2499, 85EA 


0402, 1008, C020, FFFF, 2040, 0810,0304, BIFF, 


Fi Be ah _. - 
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7A00 DATA O0D14, 1420, 6334, FEE2,CA01,CB15, 


C32A, AFE3, 7806, FOCD, 21CA, 18EA, 1511,3E00, 
0620, GDOC, CAFO, 0E19,'2B05, 4DCD, 20B8 


1410 DATA 2300, 3B3E,0A068, FOCD, 3ECA,CD20,, © 


004D, 0D19, EC20, 0C06, FOCD, OECA, 3E0A, CD20, 
CAF?7 ,F23E, F7CD, 21CA, 194D, 6C3E, DAOB 

1420 DATA 0405, 4DCD, 2300, 103C, CDE9, CADS;: 
200D, 21E2, 18300, 203E, 1580E, CD47,CAFO, 200D,. 
CDFO.CEA6. A221, 3E1A, 061%, CDO4, FL0C Ä 
1430 DATA 004D, 3623, F910, 193E, 0306, FOCD,. 
Z1CA,1AF1,303E, 4DCD, CDo00, DBB7, B7CD, 21DB,! 
1AFC, 6334, 4TE2,OAFE, 0738, DADS, 25A0 
1440 DATA 3E47, 1831, 3E02, CD30, 0945, C678, 
2330, 4DC3,CD0O, 004D, 1023, COFA, CSF5, ABOL,, 
cD6s1, DBE1.F1C1, 2C21, 1619, 0603, 0514 l 
1450 DATA CDOß,CAFO, 1105, 0018, D119, 2015,, 


:C9F2, EOCD, 21E0, 128, C322, 3EDF, 3202, E247,' 


3621, 2200, E22C, 2806, CDC5, DFSC, 84F0 | 
1460 DATA 2D21, 3452, 3434 , CEO1, CD56, DBB1,' 
1001, 3EED, 3203, E247, 0406, CDCS, DF3C, 2C21, 
34E2, 2334,0134,270F, BICD, CIDB, FB32 
1470 DATA EC10,3006,8CCD, 21CH, F3E9, 0236, 
3623, 2301, 0436, 6FCD, 2100, 1800, C322,CDDF,, 
CTEO,CEBCD, 21DF, 1AEO, A211, CDCB, B229 

1480 DATA D6R9, ACCD, 21CA, 7400, 2022, 06E2,, 
AFSF, 4732, C5E2,2C21,34E2, 8CCD, O1DF, O8AE, 
BiCD, CiDB, EF10, F2C9,61F2,6362,4007 
1400 DATA 3064, 3030, 3030, F230, 6665, 6867, 

F230,5A69, 336B, 6CF2, 6E6D,306F, F230, OOF2,, 

C93E, 9A32, 21FD, CBES, 6611, 01E2, 5173 

1500 DATA 000A, BOED, 1C21, 22CC, FD9B,C93E, 
9A32,3EFD, 1E07, C3FC, 0093, CDOF, CEIF, 0101, 
0107, 0901, 1821, TECC, 28B7,3D03, 14E0 

1510 DATA C977,6F21, 3AE2, FBDA, FEFE, OA28,,; 

FÜOFE, TECO, OFFE,3CDO, 0418, B7TE, 3DC8, 3E77,, 

3216. CC1B. 00C9, COCC, F500, D5C5, 4D11 

1520 DATA CDES, CBEF, 5D3A,3DE2, 2857,3205, 
E26D, 4D18,6C3A, 32E2, E26D, 6A3A, 3DE2, 2887, 
3205, E26A, 3B18, 562A, 7EE2, 20B7, ADSB 

1530 DATA 3A1D, B270, FE3C, 3804, AF01, 7032, 

FEE2, 3802, 2105, CD67, 0318, OF21, 22CD, E266, 

BE18,6A32, 23E2,BT7E, 1220, 7E23, 89BF 

1540 DATA 2087, 110C. 0800, 07CD, 23CD, 8622, 
18E2, 2B17, 0016, CDSE, CD07, 1623, 5EO1, 07CD,. 

23CD, 6622, 16E2,CD08, CD03, 6ESA, 2D52 | 
1550 DATA 3DE2, 2887, 3205, E26E, 4418, 6C3A, 

S2E2, E2SE, 6E2A, 3DE2, 28E7, 3205, E26B, 3218, 

6B2A, TEE2, 20BT 3414, E270, 02FE, 2A2C 

1560 DATA 0538, 3B21,18CE, 2103, CE1F, 6822, 
18E2, 3207, E26B, 7E23, 2067, 2312, B77E, 0C20, 
0011, CD09, CD07 , 2223, E268, 1718, E525 

1570 DATA 1628, 5E02,07CD, 23CD, 0316, CDSE, 
CD07, 2223, E268, 0916, 03CD, EICD, C1D1, C9F1, 
6F3A,5FE2, AOOE, S1ED, EDOC, C959, 004D 

1580 DATA ACO2, 0201, 011D, D602, 0200, 00AA, 
5302, 0201, 011D, D602, 0200, 00AA, 7D02, 0201,, 
00A0, AA02, 0200, OOBE, D602, 0200, 0395 

1590 DATA 00E3, FEO2, 0200, 011D, AC02, 0201, 
011D, D602, 0200, 00AA, 5302, 0201, 011D, D$02, 
0200, 00AA, 7002, 0201, 00A0, BEO2,5A57 

15600 DATA 0200, 00E3, D608, 0000, 7002, 0201, 
00A0, 3B02, 0202, 00E3, AC02, 0201, 008F, AAUZ, 
0200, 00D6, 7D02, 0201, 00A0, 3B02, E236 

1610 DATA 0202, 00E3, AC02, 0201, 008F, AA02, 
0200, 0006, 7002, 0201, OOFE, D602, 0200, 0097, 
3B02, 0202, 011D, E302, 0200, 008F, 8CDD 

1620 DATA ACO2, 0201, 00AA, 7002, 0201, 0097, 
3B02, 0202, 008F, A002, 0200, DOBE, AC02, 0201, 
011D, D502, 0200, 00AA, 5302, 0201, 6541 


0200, 011D, ACO2, 0201, 011D, D602, 1FSA 


1630 DATA 011D, D602, 0200, 00AA, 7D02, 0201, 
00AO, AA02, 0200, 00BE, D602, 0200, 00E3, FEDZ,, 


1640 DATA 0200, 00AA, 5302, 0201, 011D, D602, 
0200, 00AA, 7D02, 0201, 00A0, BEOZ2, 0200, O0ES, 
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'D608, 0000, AC08, 0801, 0153, 7008, AC00 


1650 DATA 0801, 017D, ACOB, 0801, 0153, 7D08, 


0401, 0000, ACO4, 0001, 7004, 0401, 023B, AC0B, 


0401, 017D, 3B04, 0802, 01AC, 7DO8, 6712 
1560 DATA 0801, 023B, ACO4, 0401, 017D, 3804, 


‚0402,0000, AC08, 0801, 0153, 7D08, 0801, 017D, 


AC0S, 0801,0153, 7D08, 0401, 0000, ODFB 
1670 DATA ACO4, 0001, A521, TECE, DOEE, 2177, 


3700, CD45, 004D, 1023, 11FA, OABE, 0206, 3D78, 
‚D5C5, D8CD, D100, B7C1, 10C0, 1BF3, 0D6E 


1680 DATA B37A, EC20, D618, 2140, CFO6, OE11, 


‚3400, E263, C8B7, OBFE, 4700, 1019, 44FD, 214D, 


2002, QECD, 23CF, 4DCD, 2100, 201C, OF61 


‚1690 DATA CD7B, 004D, 0E21,CD20, CF06, CDa23, 
'CFO6, ElCD, 22D6, E22C, EICD, 2206, E245, 0304, 


5132, CDE2, D6E1, 5422, CDE2, D6E1, EABF 


‚1700 DATA 5722, CDE2, DSE1, OAEY, OFES, 0707, 
.0707,5F3C, E60A,3CF0, 0357, CDC9, CFOE, 7E23, 


4DC3, CDO0,CEFS, 187A, 76F7, AAZA, 0ES3 
1710 DATA T45F, 0102, 0009,0000, 2100, 2206, 


.SAAD, 7457,0201, 0000, 0000, 7C00, 75D5, 3DAA, 


7C57, 0202, 0000, 0000, 2E00, 2DDs, 1894 
1720 DATA CSA6, 7C57, 0202, 8606, B11A, 3219, 
6AD3, 3DA6, 7C57, 0202, 8006, BAlA, FTLA, A4D2, 
28AD, 7857, 0302, 3606, 601A, 6119, ED97 
1730 DATA 52D2, AAAB, 8C4F, 0302, 0004, A200, 
CA1A, 75D1,2AAD, 7C57, 0302, AA06, BA1A, DDIA, 
76D0,3DA5, 7C3F, 0302, 8602, 0019, 0DA3 
1740 DATA 3900, ADDO, 62AD, 7C47 0302, 0004, 
AAO0, AO1A, 21CF, 1AAO, O8CD, 2100, 1A20, 08CD, 
21D0, 196E, 3D11, 0E00, CDO6, CFF9, 6667 


1750 DATA FE29,8C21,1119,0039,050E,FOcCD, | 
‚zUCF, Z1FB, 1840, 5B11, 0E00,CDO4, CFF9, EB20, 


5B21, 1118, 0058, 040E, FOCD, 20CF, CABC 


‚1760 DATA Z1FB,1867, F9CD, O1CF, DO2B, 0716, 


EiCD, 1ED6, CDO4, D6CC, 2015, 21F5, 1874, 0506, 
833E, 4DCD, 2300, O8EE, F810, 0D19, 9CBA 
1770 DATA 06C9, 111D, FFEO, 20CD, 78D0, OFEE, 
0720,2011, 2300, 20CD, 19D0, EE10, 3EC9, CD8A, 
004D, 3E23,C381, 004D, 185E, 1841, BEBS 


3E18,CD7B, 004D, 4021, 1118, 0021, 803E, 1506, 


‚9ACD, 20D0, 1804, 181B, FEO?7, 2004,4F73 
'1780 DATA 1103, FFFF, 1079, 21ED, 185F,1F11, 
3E00, 0680, CD15, DOGA, 0420, 1313, 0718, 0OAFE, 


0320,0111, 7900, ED10, 4501, 16D0, 9180 
1500 DATA CD16, DGEl, SECD, 15D0, F720, 0416, 
9BC3,3ED6, 1E87, CDO4, 004D, 1D23, F920, CDC9, 


‚004D, EE19, 4F08, FE78,C90C, 1488, 0517 


1810 DATA 1A94,14A77, 1465, 1AB1, 1AAB, 194E, 
192B,1931,1914,1908, 18EB, 18F1, 18CE, 18B1, 
18AB, 1888, 1894, 1877, 1865, 1842, 5FCO 

1520 DATA 1854, 1881, 9E10,1018, 19AA, B507, 


.0719,5601,16D1,CD11, D6E1, 46CD, 1501, F720, 


0816, E1CD, CDD6, D149, 2015, 16F7, DES1 
1830 DATA CDO6, D6E1, 3ECD, 15D1, F?20, 0416, 
EiCD, CDD6, D141, 2015, 16F7, CDO7, D6E1, 3BCD, 
415D1, E720, B321, I11A, D154, BSCD, 4BFD 
1940 DATA 21D6, 1941, O41E, CCCD, 11D6, 0302, 


‚31CD, 11D1,0A03, ElCD, CDD6, DSCC, 2015, CSF7, 


ALCD, CODI, D141, 8ASE, 4BC3, CDb1,522D 
1850 DATA D149, 523E, 4FCD, 3DD1;, 4DCD, 2300, 


'7TACS,4000,5018,5618,8218,8818, 8E18, 9418, 
‚09918,4218,4819, 4E19, 5419, 5919, BSES 


15650 DATA 0619, DElA, 141A, 1C1A, 461A, 4C18, 
>C18, 9E18,5E18, 0219, OAlA, 181A, EO1A, E58, 


'AU1B, A519, A919, FB1G, EAil8, AFi&, EAB7 
‚1870 DATA B219, B519, 6019, 6B1A, 701A, 781A, 


BB1A,ED19, F518, 5418, 4518, 6B18, 7C1A,B41A, 
‚EA19,5B18,0C19, 8618, AA18, 0319, 41AD 
‚1880 DATA 181A,F5S1A, 2118, 1AAA, FF11,CDD1, 


«D6B9,6F21, 1118, D216, 0606, FSCD, 21D1, 1840, | 


2811, 0652, CD07, DIF3, 0311, 0115, 62EB 
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1890 DATA. D237 , E1CD, CDDS, D6CC,, 2015, CGF7.. 


CDD5,D6B9,6011,1900, 10D1, CHFS, 7974, 7A20, 


| 2020, 2020, 2020, 2020, 2020, 2020, 703E 


1900 DATA 2079, 7420, 7878, 7A00, 7878, 2079, 
7874,2079, 7874, 2079, FA20, 7878, 7800, 7978 
TA20,7878,7978,2020, 787A, 0079, ATOF 


F 


' 1910 DATA 1961,1906,1846,18AC, 196C, 1A2C, 


1451, 19F0, 1991, 1930, 18D1, 1870, 1879, 19535, 
1999, 19F5, 1A59, 1ASE, 13DE, 19C65, 3A89 
1920 DATA 1A26, 8901, 1ED2, 3E17, CD85, Da77, 
141E,8D3E, 77CD, 1602, C308, D69B, CDFS, D6E1, 
0416, CDF1, 004D, 1523, F920, 201D, 2340 
1930 DATA CSERF, 1480, 1A48, 1A50, 1A9B, 10C0, 
1A08, 1A10, 19D8, 1998, 1950, 1908, 18C0, 1888, 
1850, 1898, 1990, 19C8, 1A90, 1A88, 4101 
1940 DATA 1800, 18D0,1918, 1840, 1464 ,1A2C, 


1A74, 1ABC, 19E4, 19F4,19BC, 1974, 192C, 18E4,. 


13A4, 186C, 1874, 18BC, 19AC, 1AB4, 16R0 
1950 DATATTAAC, 1EB4, 18F4, 1934, 1806, E609, 


 0418,192C, 3504, 041A, 188F, 4205, 0518, 1412, 


7D05, DElS, AAZ], 111A, D327, BSCD; A427 
1960 DATA 21D6, 1840, DADE, ODCD, 2103, 1862, 
ÜS0E, 2011, 0600,3E08, CD83, 004D, 3E23,CD8E, 
004D, 2323,1023,19F0,200D, CYEA, 3A57 
1970 DATA 8B83, 2020, 8B83, 2020, 7A20, 2100, 
1920, E011, OEFF,3E10, 0683, CDO2, 004D, 1023, 
T9FA,0OGFE, 0520, 2011,1800, FEO7, 565F 
1980 DATA 2003, 1103, FEEO, 0D19,E120, 2121, 
DEiA,CDOS, D37E, 4DCD, 2100, 19B0, TA3E, 4DCD, 
0100, D3F2, 0916, ABCD, 16D6, CDO8, EAE4 
1900 DATA DSSB,C021, 0E19, 3E03, 067B, CDO4, 
004D, 1023,23FA, 0D23, F320, 7EC9, TBTE, TB7B, 
7B00, 7B7B,207B, 2020, 7B20, 7BrB, CECB 


2=000- DATA ZO7B, 2020, 7B7B, 7B00, 207B, 2020, 


2020, 7B7B, 7800, 0079, 878C, 878C,208C, 8720, 
878C,B78C,878C, 208C, 8720, 878C,3F6B 
2010 DATA 8780, 208C, 3720,878C, 878C, BROo, 
BBEB, 208B, 8B8B, 8E8E, 008B, BBBB, 3BSB,8EB20, 
OOBR, BEBB, 208B, 8BESE, 8BBE, EB20, E1SA 
2020 DATA 8BBB, 8000, 8E1A, AFD3, $41A, 95D3, 
AG1A, BONS, BO19, 4203, E31, 7503, D218, 6203, 
DD18, A0OD3, DDb18, ESD3, ES18&, 43D3, 4A38 


2030 DATA 0Al19, 189D, BEOGC, 0718, 1863, 2902, 


D31A, 1A3S8,2804,0519, 198E, 0105, D532, 0OB16, 
ABCD, 1606, C390A, DSOB, 8182, 8182, EC67 


2040 DATA 8182,8182,8182,3182, 8C00, 8C8C, 
 8C8C,.8C8C, 8C8C, 2020, 8182, 8182,8182,8182, 


8182, 2020, 8C8C, 8C3C, 8C8C, BCBC, 65474 


2050 DATA 008C, 8C8C, 8C8C, 8C8C, 2086, 2020, 


0220,6281, 8281, 2081, 2020, 8620, 83CBC, BCBG, 
ScBC, 8600, 8CBC, 8C5C, 2080, BCBC, 91E9 


2060 DATA BC8C, 2020, 2020, 8182, 2020, 2020, 


8CBC, BCBC, 85020, 8CBC, BCBC, O08C, TB7B, 7BTE, 
TBTB,TB’7B, 7B20, 7B7B, 7E7B, 7ETE, E863 
2070 DATA 207B, 7B7B, 7BTB, 7B7B, 7BTB, 7B00, 
TBTB, 7B7B, 7B7B, 207B, 7BTB, 7ETB, 207E, 2020, 
7B20, 7E7B, 7TB7B, 7B20, 7BTB, 7E7B, D6D6 
2080 DATA 7B7B,007B, TBTB, TBTB, T7BTB, TB7TE, 
TBTB, 2020, 7B7B, 207B, 7B20, 7ETB, 2020, 7B7E, 
7B7B,7BTB, 7B7B, 7B7B, 7600, 7B7B, C650 
2090 DATA 7B7B,207B, 7B7B, 7B20, 7B7B, 7B7E, 
0O07B,TB7B, 7B7B, TB7B, 2020, 2020, 2020, 207B, 
TB20, 2020, 2020, 2020, 7B7B, 7B7B, 10D2 
2100 DATA 7B7E, AA00, 3B1A, 80D4,481A, 6CD4, 


3F1A, 42D4, 691A, 2ED4, 4314, 00D4 ,861A, A3D4,, 


A719,40D4,C219,60D4, E318, ABD4, 0025 
110 DATA 0418, E2D5S, 1518, 4EDS, 0719, 1551, 
>3807,1018,1844,5Al0, 0O21A, 1A45, 7202, 0218, 
186D, ABO2, 0518, 18B4, 2105, 1860, 7C7C 


2120 DATA EO11, 06D5, CD06, D5A4, FB10,C921, 


1118, DSEF, 0506, ASCD, 1BD5, FA1l0O, 4401, 16D86, 
CDOB, D6AB, 0916, 9EC3, C5D6, BICD, 43A0 
21350 DATA 01D8, 0060, C109, 3009, 8080, 2080, 
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8080. 8080, 8080, 2080, 2020, 8020, 8080, 8080, 


5080, 2020, 2020, 2020, 8020, 0080, FEES 
'2140 DATA 8080, 2020, 2020, 2020, 2020, 8080, 
'8080, 8080, 7800, 7878, 7978, 7A20, 7878, 0079, 
7878, 7878, 7978, 7A00, 7A79, 7A00,2B14 


2150 DATA 7878,7978, 7400, 7878,8000, 8080, 


2080, 2080, 8080, 8080, 8080, 8020, 2020, 7B7TA, 


'8000,8080, 3080, 8080, 8080,8080, 7574 
2160 DATA B080,8080,7A00, 7978, 2020,8080, 
8080, 2020, 3080,8080, 8080, 0080, 8080, 2080, 
8080, 8080, 3080, 8080, 3080, 2020, EAD6 
2170 DATA 8080,8000, AE1A,ADDS,CFIA, 49505, 
'F21A, 71D5, F618, 4BDS, F618, 5705, F618, 7DDS, 
'FC18, EDD5, 0018, 10D6, 141A, 4DD6, 5F6B 
'2180 DATA 2419, AED6, 3719,68D6, 1118, 1876, 
‚8204,0819, 19EB, 5303, 1218, 185A, 7613, 0418, 
'156E, A204, 0318, 2901, 1607, CDOD, 2CD3 
2190 DATA D6A8, 0816, EiCD, DADS, 035F, CCCD, 
'15D6, F420, D5C9, EiCD, EBD6, EICD, EBD6, BSCD, 
‚D1D6, 2015,C9F0,DSF5S, 1AES, O0OFE, CO4E 


10 RER EEE 


en '} & 
‚30 'x MCLOADER FÜR FREDB TEIL2 # 

gun ne ne + 
50 .'% Adressen 54975 - 57974 # 
50 '* ® 
70 '%* <C)1985 by Feter Weiland # 
80 '# % 
OO TELEEKEEEKEILEHTELTKHEFETEEHE 


'100 ° 
. »110 GLEAR 200,49999! 


120 4=54975!:Z=1000 
130. FOR B=1 TO 75 


'140 S=0 :FOR F=1 TO 20 
‚150 READ PS: P=VAL("&H'+Ps): IF P<O THEN P 
'=P+655386! 


160 Pi=P-256#1NT {P/2569:5=5+P1#A 

170: POKE A, Pl:A=Arl 

180 P2=1INT{P/256):85=5+P2IA 

190 POKE A, P2: A=Atl 

NEXT F 

S=5-65535! 13T (57655361) 

READ Ps: P=VAL("&H"+P&): IF P<o THEH P 
=P+65536! 

>30 IF S<>P THEN BEEF: BEEP: PRINT: FRIRT"D 


'ATA-Fehler in Zeile"; 2: END 
240 Z=Z+10:BEXT 3 


250 PLAY "S1IM999L1605CDEFGAB" 


260 SCREEN 0: WIDTH 40 
‚270 PRINT "Der Maschinencode ist korrekt! 
‚ generiert.";STRINGS(40,"-"2 


280 PRINT " Auf welches Speichermedium s 
NMaschinencode gespeichert we 
>60 PRINT: PRINT TAB(5)" tD=Disketta / C= 
Cassette)" 


300 IS=1NKEYTS 
310 IF I3="6cH OR Isetoe" THEN 390 


320 IF Is<>"D" ARD Is<h"Qd" THEN 300 
330 As="Diskette'" : BS="A:FREDAC 


340 LOCATE 2,10: PRINTAS;" fertig? Dann T 


aste drücken." 

IF INKEYS{>"" THEN 350 

IR INKEYE="" THEN 360 

BSAVE Bs, 50186! , 57974! 

END 

As="Becorder": Bs="CAS: FREDMC" 

400 GOTO 2340 

1000 DATA 0728, 4DCD, 2300, 1813, EiF4, FiD1, 


370 
3A0 


'F5C9, DSC5, 01ES, 0020, EOSE, ADCD, 0900, 201D, 


E1F9, CiID1, COFL, 6FOA, 0403, 0367, 9FAF 
1010 DATA 70C9,7271,7373, 7370, 7772, 7120, 


u 


"#072, 7570, 7320, 7071,7470, 7100, 7173, 7072, 


7371,7771,7000, 7270,7273,7971,4D9B 
1020 DATA 7320, 7372,7120,7372,2071, 7020, 
7270, 7370, 2020,7371, 7372, 0071,7270,7776,, 


7372, 7172, 7420,7173,7072,7270,CF04 


1030 DATA 0075, 7573, 7772,7173,7700, 7072, 
7273,7600, 7071, 7575, 7274, 0070, 7573,7076, 
0071, 7370, 7271, 7374,7172,0070,81D3 
1040 DATA 7273, 7071, 7375, 7671, 2075, 7120, 
7472,7470, 7273, 7170, 7776,7300,7372,7100, 
7773,7074,7273, 7371, 7300, 7172, FCES 
1050 DATA 2020, 2020, 2020, 2020,7771, 7473, 
7270, 7273,0077, 1AAA, D6EB, 1A80,DSFE, 1A21, 
D708,19CB, D727,19A0, D739, 19BB, 0&4F8 


1060 DATA D740, 1945, D746,1939,D74F, 192E,' ” 


D755, 1860, D7SF, 18E3, D776, 1857, D77A,18CA,, 
D784;18AA,F410,0A18, 19A4,3B07, 722C 

1070 DATA 041A, 1862, 510A, 0818, 185E, DAOE,, 
0418, FECD, 21D7, 1AEB, 4ACD, FE00, 3839, 3E08, 
CD30, 004D, 1B2B, 3CFi, 4DC3, 2100, 18AF 

1050 DATA 1AAB, 4ACD, FEOO, 2010, 2BOF,4ACD, 
FE00,2010, 2807, 4ACD, FE00, C810, A821, CD1A,: 
004A, 1AFE, FEDO, 2010, 3E08, CD19, F123 | 
1080 DATA 004D, 152B,3DEE, 4DC3, 2100, E22C,. 


| FETE,38C8, 3502, 3A00, E238, 28BE, 3608, 1102, 


OCF8, 17CD, 3ED9, 1E05, CD00, 0093, 974D 

1100 DATA F121,CD1A, 004A, 2606, 1E47,C5CB, 
043E,93CD, 0100, 07D0O, BiCD, DSDB, E&BCD, DID7, 
DETE,SFOA, 10C1, 3EE8, 1EOA, CDOO, E969 
1110 DATA 0093, 592A, 3EE2, CD20, 004D, F121, 
CD1A, 004A, GD3C, 004D, 3AFE, 0428, 013E, 0218, 
023E, 5032, C9E2,2C21, TEE2,57CB, 4DJA 

1120 DATA 0320,04D6, AF7T7, 4732, CDEZ, DFö8C, 
A821, 1114, 0000, 0306, CDCS, O04A, 784F, OSFE, 
0420, 543E,0618, O2FE, 0220, OASE, 3626 

1130 DATA 1347, FD10, 200D, C1F9, EZ10, 11EB, 
F99C, 1119, OCFE, 17CD, EBD9, 3ED5, CD04, 0093, 
5A3C, 93CD, CDO0O, D7ES, D001, CDO7, BSBE 

1140 DATA DBB1, A621, 061A,D103,CDIB, OU4A, 
I1FE, DES0, 1023, 21F6, E263, 7E34, OBFE, 0438, 
0S3E, 0218, 043E, 5032, 11E2, OAFC, 2080 

1150 DATA 073E, 93CD, 3E00, SAOA, 9303, z100, 
E22C,FETE, 38C8, 3602, 3A00, E234, 4FCD, 32DA,. 
E234,3A423, E235, 4FCD, 32DA, EZ35, 7E37 | 
1160 DATA E5SF5,3DCD, 01DD, 05DC, BICD, E1DB, 
BEF1,0320,3A2B, E234,20BE, CDCG, D®D0, 342A, 
CDE2, DAS? ,SBil,21E2, 1800, E2CD, 1114 

1170 DATA 21DF,1B10,DFCD, CDD®, DCFA, DECD, 
38DA, C3E9, DB95, 2C21, 7TEE2, C8FE, 0238, 0036, 
383A, CDE2, DA4F, 3832, 23E2,393 A, S0DE 

1180 DATA CDE2, DA4F, 3932, FSE2, CDES, DCFA, 
DC01,CDOS, DBR1, FIEl, 20BE, 2BD3, 383A, BEEZ, 
CC20, DOCcD, 2ADS, E238,57CD, 11DA, DATA 

1190 DATA E25B, 0021, CD1B, DFE2,1821,CD1B, 
DIDF, 3DCD, CDDD, DAOE, E938, 95C3, 21DB, DATA, 
0606, 237E, 235E, 93CD, 1000, CYF7, ACSC 

1200 DATA 5Fi1, CDE2, DFE2, 5B3A,C6EZ,5F32, 
043E, 93CD, 1E00, 3E04, CDOD, 0093, 5B3A, CGEZ, 


3204, E25B, 5F32, D1E2, 7530, BICD, 32B5 


1210 DATA CDDB, DD80, CBC3, 3ADF, E25E, ODFE, 
0420, 0A3E, 0A18B, OAFE, 0420, 063E, 0218, 0D3E, 
5E32,32E2, E262, 5D3A, C6E2, FEO4, 288F 

1220 DATA 3821 (3E02, 3218, E25D, 02C6, 6132, 
SAE2, E25C, O4EE, 5032, C6E2, 3208, E260,5B3A, 
FER2, CORE, CBBE, 0238, 303D, C93C, BBA9 

1230 DATA 327D, E258,5F32, 7CE2,5C32,C6E2, 


| 3208, E260, OD3E,5E32, 32E2, E262, 183E, 5D32, 


C6E2, 3202, E281, 07C9, OAF&8, 0510, 7D18 
1240 DATA 0400, OBFF, 0C00, 2109, E22C, FETE,' 
38C8, 3602, 3A00, E230, 28BE, 3808, 3D02,3C3D,. 
3032, 23E2,313A, BEE2, 0828, 0238, 1FZF 


1250 DATA 3D3D, 3230, E231, ESF5, BOCD, 01DD, 


05DC, BICD, E1DB, BEF1, C920, 3A2B, E230, Z0BE,, 


Homscomputer FI 
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SECZ, 1E07, CDF8, 0093, 0A3E, 101E, 6D75 
1260 DATA S3CD, 3E00, 1E05,CD0o, 0093, 043E, 
FFIE,93CD,3E00, 1EOB, CDO00, 0093, DC3E, OYLE, 
95CD, 3400, E230,5B32,32E2, BZSF, 3190 
1270 DATA 313A, 32E2,E256, 0866, BOSZ,3BEZ, 
S320D, EZSE, 6232, 3EE2, 3218, E25D, V2C6, 6132, 
L1iE2, E2SB, 0021, CD1B, DFE2, SF11,3ESC 
1250 DATA 21E2, 1808, B2CD,3ADF, E2Spg, Jacs, 
: 3ESF,CDO4, 0093, O41E, OD3E, 93CD, 3400, E25R, 
04C6,5B32, 32E2, E2SF, 3001, CD75, EBEC 
1290 DATA DBB1,3DCD, CODD, DCRA, CECD, 3ADF, 
B25SE, ODFE, 0420, OA3E, 0Ai18, OARE, 0420, DSSE, 
218, ODISE, SE32, 32E2, E262,5D3A, 70e3 
1500 DATA C6E2, FEO4, 3821. 
02C6,6132,3AE2, E2SC, O4EE, 5032, C6E2, 3208, 
‚#260,5B3A, FEE2, DABE, DB14, 063E, D76C 
'1310 DATA 001E, 93CD, 3E00, 1E07,CDDI, 0093, 
OCSE, 371E, 93CD, 3E00, 1E0D, C301, 0093, 780B, 
20El, C9FB, 533A, EEE2, 3204, E253, c6535 
1520 DATA 57CB, 3ACB, E251, 4FCB, 3028, >33A, 
4FE2, 5221, 46E2, 47CB, 0220, 0404,7005, FE7B, 
2801, FEO4, 3807, 7906, D1EE, 5332, 1538 
1330 DATA ZAE2, E254, 7B3E,CD4s8, 004D0,1023, 


3EFA, CD20, 004D, 3E23, 9108, 3E47,CDTB,004D, 


1023, 3AFA, E251, 57CB, 3AC8, E253, 711D 

1340 DATA 214F, E256, CB46, 204F, 0402, 0504, 
7870, 01FE, 0428, 0TFE, 0638, EE79,3202, E253. 
572A, 3EE2, 4878, 4DCD, 2300, FA1O, 3E85 

350 DATA 793E, 4DCD, 2300, 0206, 203E, 4Dch. 
2300, FA1O, 7ASE, ADCD, 2300, 083E, 4791, 783£, 
‚4DECD, 2300, FA10,21C9, 1820, 2D3A, 68C0 

1350 DATA CDE2, DEDO, 0006, 094F 2C3A,C6E2., 
CDO4, DEDO, ESCD, 09DE, 513A, CBE2, 2047. CDoE. 
DO4A, O8FE, CDCO, DE98,, 3ECO, 1805, CB94 

1370 DATA CDOC, 0044, ODFE, CDCO, DC9B, 3ECB, 
3206, E250, 3AC9, E22D, DOCD, 3ADE, E249, 00#E, 
21C9, E230, 010E, CICD, 0CDC 4634, 3640 

1380 DATA BIE2, 2108, E234, C1CD, OCDC, 4634, 
BIE2,21D8, E238, 2C3A, C6E2, BEOF, FED8, 281E, 
3002, AFO3, 0218, 1ED6, 28BE,D001, BADA 

1390 DATA 3A23, E22D, 7ECE, 0520, TECB, 15C0, 
CB03, C8TE, 06C6, DSBE, 0CD6, 0130, BEAF, 0128, 
7300, 323C, E250, 3AC9, E246, 03FE, F39F 

1400 DATA 3ADB, E23A, 0206, 17FE, 0238, 0ESE, 
3A32, 21E2, E23B, FE7E, 2002, 3604, 1803, FEiA, 
2003, 3604, 1807, FE12, 2007, 3604, D34D 

1410 DATA 1805, FEOA, 2005, 3604, 180D, 3602, 
‘2102, 1B18,3811,C3E2, DFE2, 4634, FEE2, D802, 
:363A, C6E2, FE02, 3817, 3E02, 320F, 20985 

1420 DATA E236, 3721, 7EE2, ODFE, 0420,0736, 
1A18, 07FE, 0420, 0536, 1218, 0O5FE, 0420, 03386, 
0A18, OSFE, 0420, 0236, 0218, 0036, Br6D 

1430 DATA 1021, 111B, E234, E2C3, 3ADE, E232, 
02C6, 17FE, 0238, OE3E, 3232, 21E2, E233, FETE: 
2000,3604, 1807, FEIA, 2007, 3604, 8426 

1440 DATA 1805, FE12, 2005, 3604, 1803, FEOA, 
2003, 3604, 1802, 3602, 210D, 1808, 3011, C3E2, 
DFE2, 32AF, E250, 2C34A, FEE2, DOCB, E2ED 

1450 DATA 9FFE, 3ED&, 3201, E250, AFC9, Dach, 
FEOO,28FF, 3E0E, CD01, 00D4, FFFE, 0528, 023E, 
DECDH, 3200, E24D, 2109, E24F, 3CTE, C8DF 

1460 DATA FE77,D802,77AF,CBC3, 3ADF,E2&E, 
0306, 214F, E23C, SFED, 80F6, 77A1, 1023, COFT, 
AASA, FEE2, 2800, 3DOD, 4A32, 3AE2, 1554 

1470 DATA E22C, 0406, 2032, C9E2, 2D3A, CDE?2, 
 DEDO, 2021, 1618, 5F00, 3419, E22C, 0CC6, DOCD, 
'CDDE, DEES, CDO9, 0044, 4B32, 23E2, E851 

‚1480 DATA 4ACD,3200, 3240, AB3A. FEE2,3040, 
3A21, E22D, DOCD, 3ADE, E249, 00FE.4728,.AC3A, 
FEE2, 3040, 3A0D, E22D, DOCD, 3ADE, DR6B 
‚1490 DATA E249, OOFE, 3320, 2C34, 3CE2,DOCD, 
3ADE, E249, OOFE, 0728, AB3A, FEE2, 20E0,341E, 
E24D. FFFE, 3AC0, E24A, DOFE, AFCO, BREC 


1500 DATA 4D32,3EE2, 3202, E24A, 2C3A,D6E2, 


u 
D = 


] 


S3E02, 3218, E25D, 


3204, E22C, 3AC9, E22C, 0406, 2032, GIEZ, 32AF, 
E247, BACD,3EDE, CD0l,DEBA, 023E, B623 
1510 DATA BAC3,CDDE, 0005, 00FE, FEC8,CA0i, 
DEFA, OSFE,SADA, CADF, DF32, TBC3, SEDF, OBOE, 
AF41, 13CB,9117,0130,1081,32F?, F4cı 
1520 DATA E249,177B,C92F, 1EAF, 0620, AF0a, 
41CB, 0328, 1883, A701, CB1F, 1019, 4753, 3Ac9, 
E22D, DOCD, 4FDE, 0021, 0918, 2C3A, 8352 
1530 DATA C6E2, CDO8, DEDO, CD3G, DEES, CD08, 
DOAA, EOFE, 3AC0, E22D, DOCD, SADE, E249, OOFE, 
SACO, E22C, 0406, 2C32, 3EE2, 3203, 7638 
1540 DATA E247,3AC9, E22D, DOCD, AFDE, 0021, 
0918, 2C3A, C6E2, CDOC, DEDO, CD3C, DEES, CD09, 
OQAA, EOFE, 3AC0, E22D, DocD, JADE, BF81 
1550 DATA E249, 00FE, 3AC0, E22C, 04C6, 2632, 
S3EF2, 3203, E247,3EC9, 3202, E247, 2D34A, FEE?2, 
DUOFS, 0466, 2D32, CYE2, 013E, 4732, CE63 
1560 DATA 3AE2, E22D, O4FE.D6D8B, 3ed4 , E22D, 
SAC9, E247,O1FE, 0320, 18AF, FEi18, 2002, 3E04, 
1604, FE10, 2003, 3E04, 180A,3E08, 2262 
1570 DaTA 3208, E22E, 18AF, 3211, E22E, 483A, 
FEE2, 2800, 2105, E22E, 3434, OlEE, 4832, 21E2, 
1800, 2C11,C3E2, DFE2, 1721, CD01, ‚BEBA 
1580 DATA 00C6, E13A, EEDF, 3201, DFE1, 2006, 
EEDF, 1001, C9FB, 08F1, D504, CDiA, 004D, 1323, 
F810, 1AD1, 08C6, 4DCD, 2300, 1A13, 23B2 
1590 DATA 4DCD, 2300, 1A13, CD3C, 0040, 1323, 


| C31A, 004D, 3C3A, FEE2,30FA, 3414, E230. 2887. 


FEDE, 30B4,3A0A, E231, 2887, FEO4, DD7A 

1600 DATA 38F7, 0109, E230, 3F11, CDE2, EoOA3, 
SF2e1,11E2, E230, C4CD, CDEO, DD80, 463A, FEE2, 
D802,3D3A, FEE2, 30FA, 3A14, E234, AFAS 
1610 DATA 28P7, FEOE, 30B4, JA0A, E235, 28B7, 
FEO4,38F7, 0109, E234, 4111, CDE2, EOA3, 4121, 
11E2, E234, C4CD, CDEO, DDSD, 463A, BCCC 

1620 DATA FEE2,D803, 3E3A, FEE2,30FA, SAl4, 
E238, 28B7, FEOE, 30B4, 3A0A, E239, =6E7, FEO4, 
58F7,0109, E238, 4311, CDE2, EOA3, 4E0CG 

1530 DATA 4321, 11E2, E238, C4CD, C3EO, DCRA, 
2C2A, TDE2,CBFE, 0238, 002E, BSCD, 03E0.6C13, 
BDOA, 0320, 18AF, 3808, 3E04, 1BFF, 3B86 

1640 DATA 3EO2, 1201, 3AC9, E245,C547 , 1A4E, 
FEB1,30B9,1003, 12F9, 2313, 4Ec1, allA, FDEFE, 
10D0, 12FA, 11C9, 3800, EC21, 01EO, AEB2 

1650 DATA 0140, 5CC3, 0000, 1C00,3C14, 081C, 
SDSF, I1DFD, 741C, C744, 0001, 1C00, 3C14, Ds1c, 
SDSF,1DFD, 141C, 1414, 003C, 3800, 5D98 

1660 DATA 3C28, 1038, BCFC, BEBF, 2E38, E322, 
2080, 3800, 3028, 1038, BGFC, BöBF, 2838, 2828, 
003C, 3800, 7C54, 1038, BAFE, BABA, 389E 

1670 DATA Z8BA, 2828, 0060, 3800, 7D7c, 1139, 


| BEFF, B8B8, 22BE, 2322, 0060, 1C00, BE3E, 880C, 


1DFF, 1D1D, 447D, C444, 1806, 6ESC, F257 
15680 DATA DFSE, BFBF,BFBF,BFBF,SEDE, Ssc6E, 
0018, 3C18, 6EGE, DFDF, DFDF, DFDF, 6ESE, 1835, 
N000,3C00, ERTE, FTF7, F7F?T, F7ET7,A1SC 
1690 DATA TEEF, 003C, 0000, 0000, TE18, FRF7, 
FRFB, F7FB, 187E, 0000, 0000, 3C18, FRTE,FFFF, 
FFFF,EFFF, 7EFF, 183C, 0100, 0603, CBF3 
1700 DATA OAOE, 1C1B, 1E1E, 1E1E, 0OBOD, 0307, 
C001,30E0, 2838, 1C6C, 3C3C, BC3C, E8D8, EOFO, 
01C0, E07, 161E, 3C3B, 3E3E, 3E3E, 4CA4 
1710 DATA 131D,070F,C001,38F0, S43C, l1EGE, 
SESE, BESE, E4DC, FOF8, 00C0, 0EO3, 361E, TC7B, 
TETE, TE7TE, 133D, 030F, 0000, 38E0,655F5 
1720 DATA 363C, 1F6F, 3F3F, BESF, EADbE, EOFB, 
0000, 0000, FFFF,FFFF,FEFF,FFFF,FFFF, 0000, 
0000, 7830, FCFC, DOFC, 0B80, 3FiF, 3947 
1730 DATA 3F3F, 0C1E,5F00, 06D8,480F, 14C2, 
SA02, OE4B, 0403, 1650A, C804, DADO, FFO1, OLEE, 
0101, 0202, 0000, 0003, 20E0, FA00, DF2F 
1740 DATA 0000, 0700, 0007, 0500, 0000, 1932, 
BCBF, OA1C, CA4BF, OALE, 0003, DF60, 65CD, Ö2CE, 


0702,0202, 0200, 7C57, 04B1,FDES, ‚STFE 
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Perfekter 3D-Elfekt, tolle Grafik undein rasanter Handlungs- 
ablauf sind die Zutaten dieses fantastischen Strategie- 
‚spiels. Das Geschehen läuft ab aul einem Feld aus vier mal 
vier Kästchen. Springen Sie mit ihrer Spielfigur auf eines 
dieser Quadrate, so nimmt es eine andere Farbe an. Ziel ist, 
eine kompletle waagerechle, senkrechte oder diagonale 
| Reihe zu bekommen. Doch das ist natürlich nicht einfach: 
eine gegnerische Spielfigur hüpft ebenfalls auf dem Feld 
umher und belegt die bereits von Ihnen besetzten Kästchen 
mit einer anderen Farbe, Ein dauerhaftes Vergnügen fürgroß 
und klein! 
DM 24,50 (Kass.), DM 29,50 (Disk.) 


Begleiten Sie einen mutigen Raumschiffkommandanten auf 
seiner Reise zu einem fernen Planeten. Dort gilt'es, die um- 
herliegenden Diamanten aufzulesen. Aber Achtung vor den 
Bewohner des Planeten: Sie haben es auf den armen Cap- 
'tain abgesehen. Seien Sie also aul der Hut, und gehen Sie 
| mit der gebotenen Vorsicht zu Werke. 
Das Spiel besticht durch seine herrliche Grafik und eine 
perfekte Animation. Aber auch der brillante Sound und die 
hervorragende SPRACHAUSGABE sorgen für beste Unter- 
haltung — nicht nur für ein paar Stunden! 
DM 19,90 (Kass.), DM 24,90 (Disk.) 
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Er war dunkel. Nur der schwache. Licht- 
\ schein. deralten Straßeniaterne drang dureh 
das Fenster, Doch Jin hatte Keine Angst -er 
‚Hirchtete sich eigentlich nie, höchstens vor 
seinen Lormptter. 
Er war wie.besessen von diesem: Ding, die- 
sem kalten, toren Gegenstand. Über Leute, 
die. abends einen spannenden Krimi lesen 
oder fernsehen, über die Konnte Jim nurla- 
chen, Nein, er bedanerte sie. Jim wollte 
selbst In das Geschehen eingreifen, die 
Handlung bestimmen. Er programmierte 
seine eigenen Mordeeschichten, 
Wie jeden Abend flinmterte der Bildschirm 
seines Computer. Am mache niemals 
Licht, alle Lampen mußten auseeschalter 
sein. Als das Telefon laut und vehement 
Klingelte, hatte er schon Seinen zweiten 
Mardin dieser Nacht aufgeklärt, Widerwil- 
lie stolperte er zum Telefon. Ferdammite 
Dunkelheit. im brüllteseinen Namen indie 
Sorechmuschel, ohne seine Wut über die 
späte Störung zu verheimlichen, Doch der 
Anrufer meldete sich nicht, Jim spürte eine 
plötzliche Kaltewelle, „So etwas!” dachte 
er, alsersich umdrehte, um zu sehen, ob das 
Fenster geöffnet war, Doch es war fest ver- 
schlossen, wie jeden Abend. Während sich 
Jim noch fragte, ob vielleicht Angst der 
Grund für dieses merkwürdige Gefühl der 





Auch in diesem Heft können sich mog- 
licherweise Fehler eingeschlichen haben. 
Henn Sie diese „handfesten Mängel" 


feststellen, dann füllen Ste den Coupon 


„Fehlerhaftes Listing“ aus, und senden 
Sie diesen an die HOMECOMPUTER-Re- 
dakrion, TRONIC-kerlag, Postfach 870, 
3440 Eschwege, 


Kalte war legte der unbekannte Anrufer 
nieder auf. Unbewuft kontrollierte Jim die 
Heizkörper, obwohl es ihm eigentlich gar 
nicht mehr zu Kalt vorkan. „so ein 
Quatsch” murmelte er, setztesich wiedervor 
den Computer und versuchte, sich zu kon- 
zentrieren. Jim hatteniemals Angst. Aberer 
konniees einfach nicht vergessen, so sehrer 
sich auch danım bemühte, Wer zum Teufel 
wares, der ihn zu so später Stundenachan- 
rief. Er versuchte sich einzureden, daß sich 
dieser unhöfliche Anrufer nurverwählt hat- 
te= wie oft mag dies wohl pro Nacht in einer 
Stadt wie San Franzisco geschehen? 

Jim habte dieser Gefühl. Er wollte es ein- 
fach vergessen, aber es gelang ihm nicht. Er 
konnte es nicht aus seinem Konf reißen. Es 
hattesich festgesetzt, eingenistet wieein Pa- 
rasit, Plötzlich machtethn. dieser verdamm- 
te Computer nervös. Die Dunkelheit schien 
sich mit dem unheimlichen Anrufer und mit 
diesem elektronischen Etwas verhündet zu 
haben. Am nahm sich vor, diesen teuffi- 
schen Pakı zu besiegen und gingschnellzum 
Lichtschalter. Seine rechte Hand war nur 
noch wenige Zenfimerer davon entfernt, als 
er plötzlich sein eigenes Verhalten nicht 
melhrverstand, Es war doch geradezu lachı- 
haft und kindisch, sich vordem Dunkel zu 
‚furehten. 


Teilnahmebedingungen: 

+ teilnehmen kann jeder HÖMECOM- 
FUTER-Leser 

+ Lohn für die „Mühe": es werden fünf- 
mal 100 Mark an die schnellsten Ein- 

' sender vergeben. 





eenten 





Dach wiesehrersich auchanstrengte, erbe- 
kam einfach keinen. klaren Kopf mehr. 
Schließlich entschloß er sich, den ganzen 
Unsinn mit einem Glas Whisky herunterzu- 
spülen, Eis war genug vorhanden, auf Soda 
konnte er gut verzichten. Zuerst nahm Jim 
nureinen kleinen Schluck, erversuchte, sich 
zuf den angenehmen Geschmack zu kon- 
senirieren. Dann trank er das ganze Glas in 
einem Zug aus. Er redere' sich ein, daß es 
ihm nun bedeutend besser ging, und naclı- 
dem er noch ein Glas:gefüllt hatte; widmere 
er sich wieder seinem Computer. 

Das Zimmer war angenehm lermperiert. An 
die Dunkelheit hatte er sich inzwischen ge- 
wohnt. Als das Telefon klingelte, verspürte 
er plötzlich efne pantsche Angst. Er sprang 
auf und ri den Hörer von der Gabel! Das 
‚ganze war. nur ein mieser Trick. Der Killer 
warschon lange in der Wohnung Niemand 
vernalım den Schuß - Schalldämpfer, na 
klar. | 

Jim hatte es die ganze Zeiteewußt, Wär ja 
auch noch schöner, wenmer ein Adventure 
nicht lösen könnte, „Zum Glück ist das 
nicht die Wirklichkeft" dachte Jim, zähnre, 
und einge zu Bett. 


—— ENDE— 


+ ein Listing ist nur dann fehlerhaft, 
wenn das Programm nach richtiger 
Programmiereingabe eine ERROR- 
Meldung ausgibt. 

+ nur die ausgefüllten Nachweis- 

Coupons können berücksichtigt 

werden, 


Nachweis-Coupon für ein fehlerhaftes Listing in Homecomputer 


Name Worname 


PLZ/Ort: 


Folgende Fehler sind in dem Listing: 


Straße, Nr: 


Datum, U nterschrift 


(Progammnmame) 





{Listingreilch 


(Sere] 


rrehäig ist: 


## HOMECOMPUTER 





August/September '86 














Ze A 








Unter diesem Motto 'stärlen wir ein neues 
Quiz:-Fliergiltesiliesen abgebildeten „Schnip- 
selsalai” derart zusammenzusetzen, daß das 
Tnelloto eines bekannten TRONIC-Program- 
mes entsteht, Diesesbesagte Programm haben 
wir in einer der zurückliegenden Homecom- 
Pulerauspaben veröffentlicht. Einem passio- 
nierten FIC-Leser wird dieses einprägsame 


August/September '86 


screen besiimmi noch vor Augen stehen! 
(Her? Unter den hoffentlich zahlreich einge- 
henden Lösungen werden wir drei Gewinner 
dusiosen: 

Der 1, Preis besteht aus 5 (!) frei wählbaren 
Programmen aus unserem grolen Soltwarean- 
gebot. Der ?, Preis beinhaltet drei Datenträger 
ul Wunsch und auf den dritten Gewinner 


warten immerhin noch 2 Proerammkassetten 
bzw, -Diskelten 


Also Freunde aufans Werk! Die Einsendungen 
schickt bitte an: den TRONIC-Ferlag, Postfach 
870 ın 3440 Eschwege (bitte unbedingt Art des 
Datenträgers und 5 Programmwünsche ange- 
ben), Einsendeschluß ist am U, August 1986, 
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Programm Bra En Bestell-Nr. | Programm (nur auf Kassette erhältlich) ash Bestell-Nr. 
Reactor/Concentration/Datenbank 17,50 2, u HC/C-1 I Zyklo/Geldsammler 11,50 HC/VA 
Warlords/Caverns of Death 14,50 19,50. _ HCC | Starwars/Punktefresser 14,50 HC/Y-2 
Allen- Destrover‘Duell 24,50 29.50 HC/C-3 | Catch the Fish Mister Jump 14,500 HC/V-3 
Ocean Game/’Tennis 17,50 23,50 HC/C-4 | Ghosts’ Eggs/’Foxhunt 14,50 —HCAV4 
The Caves 17,50 ° 23,50 HC/CHS | Breakout/Collector 14,50 HC/V-5 
Gardener 17,50 23,50 HC/C-6 | Q- Bert/Salvage Urew 16,50 HCY-6 
Ufo/Skateboard am 21450 2950 HC/CH-4 | Dogfight/Schwitzbad 16,50 HC/V-I-4 
ympic Biathlon‘ | ar | 3 1,5 HC 
Pole Position/Save your teeth/Push 450° 29,50 HC/CH-4 | Tr a HC 
Explorer 2/Programmname? 2450 29,50 HC/CH44 | Men -Bosene/ Easy EC HC/VEN 
Die Festung/Tank-Simulation 2450 2950 HC/CS4 | en  ——— 
Atari 800 XL ZX-Spectrum 
| 
Programm Ren Ma Bestell-Nr. | Programm {nur auf Kassette erhältlich) a N Bestell-Nr. 
Manice/Fünf gewinnt 1450 1950  HCA-I | Plong 13,50 HC/S-I 
Atlantis Cosmische Arche 14,50 19,50 HC/A-2 U-Jäger/Ritter Kunibert 14,50 HC/S-2 
Castle of Confusion/Magie Fire 14,50 19,50 HC/I-3 | Mad Space/Milli, die Milbe 14,50 HC/S-3 
Sprinter '84 1450 19,50 __HC/A-4 | Mister Pacman/Pooyan ERFFaRN. HC/S-4 
Montezumas Rache 1550 1950 HCILS _ [ Wheel 1 rl HC/S-5 | 
 Cambodia/Splat 2450 29,50 HCA-6 | Rotate/Chrrp 15,50 HC 
| Agent/Nasenjack E 24,50 29.50 HCA-1-4 | Karatron E 15,50 — HOS&1-4 
Hubert,Vulkan | 24,50 x HC/I-2-4K | Hole Jumper 15,50 HC/S-2-4 
|; Yelkanyke:Das 24,50  HC/-2-4D | Sneakers/Splot 15,50 HC/S-3-4 
en a 
Ver ee 24,50 29,50 HCA-44 | nn m np — ee 
| Cuttlemania/Jack the Digger 24,50 29,50 HC/A-S-4 4 





—— 





Zu m 


_HEFRO HORSE/ZX-Spectum HUBERT/ATARI 500 AL EARTH RESCUE/VC-20 
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Schneider CPC-464 


Programm 


Fallschirmspringer 


Geisterschloß 


Zeichen-Designer 
Mini Car Race’ Interceptor 3 D 


um mn mm m sm mm m mm Dome zu sommeoommemm m cm im am m me” mn me mn 


Secret Agent 


Space Invaders’ 
Mini Pac’, Ctti's 1 Sound“ 


Samson und 1 die Kisten/ 


Verllixte 15 


Moon Landing’Panzer 





ne Tr 


HC/SR-6 | 


Bestell-Nr. 











HC/SR-3 
HC/SR-4 | 
HC/SRS_ | 








HC/SR-1-4 | 


j 





7-9 








HC/SR-2-4 | 
) 


HC/SR-3-4 | 
HC/SR-4-4 | | 
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MONTEZ UMAS RACHE/ATARI 
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Preis,’ Preis,’ 
kasselte Diskette 
M-- 24,50 
er 24,50 
12,50 24,50 
17,50 26,50 
12,50 24,50 
17,50 27,50 
17,50 27,50 
17,50 27,50 
12,50 24,50 





ri 


Nutzen Sie unser a Ke: 
Sas3s FR IMSX * (51/, Zoll) 


| 


| 


N 











Programm {nur auf Kassette erhältlich) 


| Liftbär/Luftkampf 

Blue Bugs/Perlentaucher 
Coal Miner/Meteor/Infra 
Santa Maria/Tarzan | 
Moonlander/Billard 

(| 007 - Im | Angesicht des Todes 
Monkey Dong 
Cireus’/Bapunzel 





Dark Dark Legion 


| Programm 


Solaris 
Rabbit Walk 
Flying Rescue 
Letter Puzzle 
Moon Race 


| Moon 


Skyereles 
Crazy Kong 


Fred and the Bubloids 


Preis,’ 





Teer Bestell-Nr. | 
14,50 HC/T-I 
14,50 HC/T-2 
17,50 HC/T-3 
14,50 Ho | 
14,50 HC/T-5 
14,50 HC/T-6 
14,50 HC/T 1-4 
16,50 HC/T-2-4 
14,50 HC/T-3-4 
14,50 HC/TAH | 
12,50 HC/T-5-4 
« | 
en ee Bestell-Nr. 
g- 17,50 HC/M-4 
1150 18,50 HC/M-5 
1450 1950  HCM-6 
1250 1750  HCMI-4 
14,50 19,50 HC/M-2-4 
1250 17,50 HC/M-3-4 
1250 1750 HC/M-4-4 
Fre HC/M-5-4 
MOONLANDER/TI-99/4A 
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Am 1. Juni 1986 fand in der Wuppertaler 


Stadthalle der dritte Computer-Floh- 


markt statt, Dieser wurde, wie in den ver- 
gangenen Jahren, von dem Bergener- 
Computer-Qlub organisiert und durchee- 


führt, 


Nachdem der Besucher 3,- DM Eintritt 
bezahlt hatte, war dieser sicherlich ent- 
täuscht, Denn waser vorfand, "war nicht 
etwa ein Flohmarkt, sondern Stände von 
Firmen, die zum größten Teil nur neue 


‚Geräte bzw. Software anboten. Wer also 
mit der Absicht, billige und gebrauchte 


Computer mit Zubehör zu echten Floh- 


marktspreisen zu kaufen, nach Wuppertal 


gekommen war, der konnte diesen Ge- 
danken schnell’vergessen. Im Gegenteil, 
die Geräte wurden zustolzen Preisen ver- 
kauft (so kostete ein C-I6 stolze 149,- 
DM), 


Bei den fast 60 Anbietern fandmanvoral- 
iem Zubehör für die Atari-ST-, Commo- 


dore 64- und Schneider-Rechner. 


Neben den Dutzenden Atarisgab esauch 


einen (!) Amiga, aber der fiel schon gar 


nicht mehr auf; Für die kleineren Außen- 
seitercompuler wie 2;B. MSX, ZX-B1, 
u.a. war so gut wir nichls zu bekommen. 








Lediglich Bücher und einige (ältere). Pro- 


gramme konnten günstig erstanden wer- 
den, Aber das war dann auch schon alles. 
Aufgelockert wurde die Hektik in der 
Halle durch eine Informationsschau des 
Bergener-Computer-Clubs und des TI 
99er Workshops Rheinland. Dabei zeigte 
der Bergener Club die Leistungsfähiekeit 
von Sound-Samplern. Hier konnte der 





Ber: In ein Mikrofon RR Ei- 


nen kurzen Augenblick später wurde 
dann über ein Keyboard das gesprochene 


Wort digitalisiert wiedergegeben. An ei- 


nem anderen Stand wurde die Steuerung 
von Robotern anhänd von Fischertech- 
nik-Modellen eindrucksvoll vorgeführt. 


Auf.der Bühne der Stadthalle wurden an 


mehreren Atari-ST Geräten die Grafik- 
und Soundfähigkeiten dieses Computers 


demonstriert. Allerdings fe hie hiergänz- 
lich der Kontakt zu.deni interessie rten Be- 


suchern. 


Der TI 99er "Workshop führte „aufge- 
motzte“ TI’s unter dem Motto „TI-99/A4 


in Perfektion“ vor, Interessierten Besu- 


chern wurde die Technik und Arbeilswei- 
se der Tl's erklärt. 


Unter den Clubständen habe’ ich aller- 
dings den in Wupptertal ansässigen Sinc- 
lair-Spectrum-User-Club vermißt. Somit 
gab es auch für die Sinclair-User nichts 
besonderes zu sehen. 


Fazit: Die Mehrzahl der über 1800 Besu- 
cher (im Vorjahr waren es weit über 2000) 
war von dem sehr kommerziellen „eloh- 
markt“ entläuscht, denn unter einem 
Flohmarkt versteht man den Verkauf von 
Privat an Privat! Ya | 
Stefan Swiergiel 
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fi | dal dl] Dieses speziell für den Commadiore 64/128 entwickelte Nachschlage- - 
I BERN ii werk gibt Ihnen 


Die 87 Im Grundwerk enthaltenen Programme sind in Microsoft-BASIC  #ehundertprozentig lauffahlge Programme u. Hiifsrowtinen 


geschrieben. Hinweise auf gerätespezifische Besonderheiten ermög- für Wirtschaft, Technik, Grafik und Sound, u.a. Im Tell 9. die Super- 
. lichen Innen die problemlose Anpassung auch anihr Gerät. Sie erhhal- maus sowle darauf abg estimmte Programme zur Datenauswertung, 
ten u.a Textverarbeitung oder Datelverwaltung 
“ wirtschaftliche Programme u.a. Barwertberechnung, Tiigungsplan eines #rechaerberogene Programmierkurse für höhere Programmiersprachen und Assembler 
. Darlehens, Verwaltung von Stichwörtern, Terminkalender, Abrech- - das Grundwerk stellt Ihnen u.a. einen bewährten Assembler, einen 


nung von Kfz-Kosten, Netzplantechnik, Transportoptimlerung, zins- Disassembler und Maschinensprachenmonitor zur Verfügung 
verkehr und Kontenabrechnung, 
“detaillierte Systembeschreibungen mit genauer Beschreibung der Prozesso- 


“ technisch / matematische Programme, wie Kurvendiskussion ren leejalgers-eleig el Ssound- und vYideochips sowie Speicherbaustel:- 
(Extremwerte..J lineare Malz] (Berechnen der inversen ne ihres bders M2Bers) 
naar IKombinatorik , J Iterpolation und ARprOKIME- interessante Erweiterungen und Zubener 

. Querschnittswerten, Wertetabelle für digitale Schaltungen - Teil 7 zeigt Ihnen u.a. wie Sie Ihren Gder mit. CPM nachrüsten oder 


wie Sie sich mit Software aus EPROM- Modulen ein neues Betriebs- 


@ allgemeine Informatik-Programme, system schaffen 
u.a. komfortabler Texteditor, Einstellen von speziellen Druckerfunk- | 
tionen. Sortleralgorithimus bei beschranktem Hauptspeicher, Ausga- e komplette erg re Hngdeketu E 


ir test, Paralleiprogrammierung (wie ist es möglich, le Mikro Lichtgriffels. 
gleichzeitig zu drucken und zu sortieren ..., # Ergäntungtausgaben zum Grundwerk 
| an ur er mit neuen nützlichen Routinen und Pro rammen, Intensivkursen in 
b u allgemeine Programme zur Ausbildung VRleRtleelihte ..., zur Gesund: Sprachen v wie 1000, Pascal und Forth, ee Erweiterun- 


- nung spiele (Türme von Hano!,, 
Zu ledem Programm erhalten Sie eine ER die Vorgehensweise, ein Fordern Sie noch heute an: 


nisieielen „Neue Möglichkeiten mit dem Commotiore C 64/128" 


AN: für Einsteiger: das Einmaleins des Programmlerens, Der theoretische . in - | 
Ten dieses Werkes führt Sie von der richtigen Vorgehensweise bei ren ee AN Grundwerk ca. 400 Seiten, | | 


. der Eingabe über Programmzellen, Konstanten und Variablen bis 
- hinzu den Befehlen und Funktionen. Ale 2-3 Monate erhalten Sie Ergänzungsausgaben zum en 


ul I 130 r E 
Pe Wichtigste über RE nr rich nn en I en zum Seitenpreis von 38 Pfennig. [Abbestel- 

_  Sieerhalten z.B. das Aufbauschema eines Micros, das Ihnen den 
Funktionsablauf der einzelnen Hardwarerelle ICPU, Speicher, Ein-/ le En | 
‚Ausgabe-Bausteine etc.) und die mubuecn (Drucker; Diskettenlauf- 
werke usw. vor Augen führt. . Ct LIU | 


„Aktuelle Musterprogramme in BASIC" 


extrabreiter Ringbuchordner im Großformat 
. DIN Ad, Grundwerk 1092 Seiten, 
. Bestell- Nr. 1300. ‚Preis: DIN rd 


Alle2-3 Monate erhalten Sie 
Ergänzungsausgaben zum 
Grundwerk mit jeweils. 
3.120: Seiten zum Seiben- 
preis von 38 Pfennig 
(Abbestellung jederzeit 
möglichi. N 
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